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Utili-Keys 

Unlock the Power 
Of Your TRS-80 



Input Screens 
The Easy Way 



14 New Commands 
For Cassette Basic 



Garbage Collection: 
Causes and Cures 

Editext: A Hybrid 
Line/Screen Editor 

Streamlined Editing 
In Model 4 Basi 

MAD: A Model 4 
Address Mapper 




Knock The Socks Off Your 



Beef up Your 
^^ Color Computer with 



Radio Shack Accessories 

Using somebody else's home com- 
puter can be a pretty frustrating 
thing. Tiny memories, second-rate 
graphics and limited accessories 
take all the fun out of programming 
and video games. That's why seri- 
ous computer hobbyists enjoy 
Radio Shack's Color Computer so 
' much. No other color computer ex- 
pands to do so many things. 

Get Room to Grow With Disk Storage 

Add a single Radio Shack disk drive to your Color Com- 
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5 1 /4" diskette. That s 156K of disk storage for $50 less 
than last year! After you have your first drive (#26-3029), 
you can add up to three more for $279.95 each, for an 
incredible 624K of disk storage. Installation of your first 
drive is a snap. Just plug the Color Disk Drive controller 
Program Pak w into the Color Computer cartridge port 
and you're ready for high-speed file creation, storage 
and retrieval. Each disk drive comes with Radio Shack 
performance and reliability built in, so your Color Com- 
puter will always stay ahead of the times and up with 
your needs. 



Add a Low-Cost 
Personal Printer 

High-performance 
printing from your 
Color Computer is fast 
and easy with the 
DMP-110 dot-matrix 
printer (#26-1271, 
$399.00) from Radio 
Shack. The DMP-110 
gives you proportionally spaced or correspondence-quality 
characters for letters and reports at a swift 25 characters 
per second— about 200 words per minute! The DMP-110 
prints mono-spaced characters in standard, elite or con- 
densed fonts at 50 characters per second: fast enough to 
print homework or reports in just minutes. The DMP-110 
also offers all the print capabilities you need: italic charac- 
ters, super and subscripts, underlining and microfonts. 
You can print originals or originals and a carbon copy on 
4" to 10" fanfold paper or on single sheets. 





Neighbor's Kiddie Computer 



Access Computer 
Networks With a 
Mddem 

When you add the Radio 
Shack Direct-Connect 
Modem I to your Color 
Computer, you've given it 
the ability to communi- 
cate with other comput- 
ers and with a variety of 
information retrieval services by phone. The Modem I 
(#26-1175, $99.95) plugs directly into a modular telephone 
outlet and into your Color Computer. It translates electronic 
impulses that make up computer information into tones 
that can be sent over telephone lines. It also translates in- 
coming tones into information your Color Computer can 
store and display. It's an important tool for Color Computer 
users who want to access computer bulletin boards, keep 
track of the stock market at home or use your school's 
mainframe computer. 

Choose Radio Shack for Computer Support 

The Color Computer and its peripherals are only part of 
the reason Radio Shack is the choice for serious computer 
users. Radio Shack offers unmatched support for the 
Color Computer owner, with exciting accessories like an 
easy-to-use Color Mouse for video games and color graph- 
ics. Video game players have two types of joysticks to 
choose from, and three memory upgrade kits are available 
to increase the internal memory of your Color Computer. 

Software Selection Available 

Disk software for the Color Computer includes SCRIPSIT*. 
an easy-to-use word processing program that offers op- 
tional upper/lower case display and background printing; 
Cash Budget Management, to keep an accurate record of 
cash and bank accounts; Spectaculator" , for financial 





MBl \§L 




1 J 







u^ ^c<^ ^fiw9 



software options, too. Choose from more than 20 com- 
puter programs for educational or household applications. 
More than 30 popular video games are also available for 
the Color Computer. 

Visit Your Nearby Radio Shack Today 

Start color computing today with a visit to your nearby 
Radio Shack Computer Center, participating store or 
dealer. No other computer offers the power and capability 
of Radio Shack's Color Computer for the price. And no 
other manufacturer offers Radio Shack's nationwide ser- 
vice and support. So only a Radio Shack Color Computer 
and accessories will do! 

The Technology Store 

A DIVISION OF TANDY CORPORATION 



FREE! All-New 1985 Computer Catalog. 

Mail To: Radio Shack. Dept. 85-A-246 
300 One Tandy Center, Fort Worth, Texas 76102 



STATE 

TELEPHONE 



Prices apply at Radio Shack Computer Centers and at participating stores and 
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T/Maker 

Integrated Software 

Simple, Powerful 

Well Liked. 




"The program is a 
pleasure to use... 
[it] is well imple- 
mented, well docu- 
mented, and is quick 
in operation. It de- 
serves an AA rating." 
-F.M. Remley, 7/83 



InfoWorld 

The NffunurerfcH lot !Mlf rofomputrr l \ti • 

"T/Maker is a superb product! I have yet to 
see anything that comes close to its level of 
system integration, overall ease of use 
and general sophistication." 

-Tim Doneliuk. 7/11/83 



Performance 
Documentation 
Ease of Use 
Error Handling 




"...if you regularly 
prepare documents 
combining text, 
charts, and lists, 
... if you belong to 
an organization 
that uses several different kinds ot 
microcomputers ... if you want to 
reduce the training burden and 
improve the capability of sharing 
files... T/Maker can become the 
key program in your software 
library." 

- Frank J. DerHet, Jr, 4/84 
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INIERFACEAGE Magaz,. 

"After using T/Maker for some time, 
my reaction is that this program 
accomplishes its job simply and 
without effort." 

-Michael Heck, 3/84 



Everything In ONE 
Program. 

Available for Kaypro JRS-80 Model II, 4/4P, 
12, 16 (requires CP/M) 
Also available for IBM PC, TANDY 2000, 
Tl PRO, DEC Rainbow, requires 128K. 

Suggested Retail: $450 

Ask your local Radio Shack Center for more 

information or call: 

T/Maker Company 

2115 Landings Drive 

Mountain View, CA 94043 

415 962-0195 



POPULAR- 



COMPUTING 

"T/Maker is an excellent choice. . . Unlike the other 
(integrated) programs, it is available for the vast 
number of 8-bit computers running the CP/M 
operating system as well as for the more powerful 
16-bit computers." 

-Michael J. Miller, 12/83 
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I f Integrated Software 

Word Processing 
Spread Sheet Analysis 
Relational Data Base Mangement 
Spelling Checker 
Bar Chart Graphics 
Plus On Line Help 



t 1984, T/Moker Company 

Peelings II quote from "T/Moker III". V4N7, C 1984, Peelings II, Inc.. reprinted by permission, all rights reserved InfoWarld quote from "T/Maker III, A General Purpose CP/M Program", C 1984 InloWorld. reprinted 
by permKsron. all rights reserved. PC Magailne quote Irom Prepare la meet Your T/Moker", V3N7, C IV84. PC Communications. Corp., reprinted by permission, all rights reserved, ftipular Computing quote from 
"T/Moker Oners a Different Approach , 12/83, C Byte Publications. Inc , reprinted by permission, oil rights reserved Interface Age quote from T/Maker III, Integration at a Modest Price V9N3, C 1984. Interlace 
Age Magazine, Inc., reprinted by permission, all rights reserved Repnnts available on request. 



SHOULD YOU CALL THE DOCTOR? 







Consult the HOME HEALTH GUIDE for CHILDREN and Your Home Computer. 

With the HOME HEALTH GUIDE for CHILDREN you have Instantaneous access to vital Information about 1 55 
lealth problems - typical for infants, children and adolescents. It tells you when to call the doctor and gives you: 



• description and definition of symptoms and causes 

• recommended actions to be taken 



• recommended home care 

• recommended preventative measures 



It includes everything from diaper rash to dandruff, from mumps to the common cold, from splinters to selecting 
shoes. Here's the table of contents 



INTRODUCTION TO THE HEALTH GUIDE 
GLOSSARY OF SIMILAR TERMS 
MOST COMMON PROBLEMS 
EMERGENCIES 

PREPARATION FOR CALLING YOUR CHILD'S PHYSICIAN 



SKIN 

BRAIN 

EYES 

EARS 

NOSE 

MOUTH AND THROAT 



LUNGS 
ABDOMEN 
BLADDER 
GENITALS 
BONES AND JO 



(NTS 



The three disk package was written by Barton D. Schmitt, M.D., a well known Pediatrician and member of the 
faculty at the University of Colorado School of Medicine. It Is published by Clinical Reference Systems, Inc., a 
leader in the field of medical electronic publishing. 

The HOME HEALTH GUIDE for CHILDREN is both a reference tool for you as well as an educational library for 
your entire family. The software is easy to use - all instructions are built-in. 

The suggested retail price, for all 3 disks of information, is only $69.95- 

To order: Ask for the HOME HEALTH GUIDE for CHILDREN from your local store. Or send in the coupon below 
CRS, PO. Box 20308. Denver. CO 80220. USA. For the fastest service, call toll free 1-800-821-2794. 



In Colorado call 399-7089. 



HOME HEALTH GUIDE is available for. TRS 80 ■ Model III and 4. 
IBM PC ; AT&T 6300 ."Zenith 1 50'", Compaq f Corona f" 
and Apple lie ' 



Computer Brandy 

ZTTT 



Model 




. Subtotal 

Colo residents add 
3'/2% sales tax 



_jZ5 Postage/handling 
Total 



State 



t 



Name . 

Address I 1 . 

City ; ; | 

Check enclosed for $_ 

We welcome your charge order. Please fill in all the infor 

Mastercard Visa My card expires I 

My card number is molyr. 

I I I I I I /_/_/_/_/ J_l_l_l_l 




CLINICAL REFERENCE SYSTEMS INC 
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Best CP/M 



computers. 



Pickles & Trout CP/M is the product of over four years of 

experience with Radio Shack computers — and their users. 

Thousands of people use it with pleasure. So can you. 



IT'S FLEXIBLE 

With P&T CP/M 2, you can 
take advantage of every feature 
of your Mod H/12/16. Choose 
from among the 2000 or more 
CP/M -80 programs now on 
the market. Use either Radio 
Shack or Corvus hard disk 
systems. And use Radio Shack 
or non-Radio Shack printers, 
plotters, modems, terminals and 
other peripherals. 

IT'S WELL-SUPPORTED 

The fully-indexed P&T manual 
is understandable and compre- 
hensive. And our experienced 
support staff is always available 
to help you. 



IT'S COMPACT AND 
POWERFUL 

P&T CP/M 2 packs a lot of 
power into as little as 8.5 
Kbytes of RAM. Its many 
unique features include a mas- 
ter diskette that automatically 
copies itself, an easily-used 
system MENU, 20 special 
utilities, programmable keys, 
a full-screen editor, a screen 
print function, and many extra 
programming tools. 

IT'S A BARGAIN 

The floppy disk version of P&T 
CP/M 2 is only $200. Hard disk 
versions are $250. And no hard- 
ware modifications are required. 



Order today or use the attached coupon to find out more about the 
best CP/M for your Mod H/12/16. 
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The left bracket. [. replaces the up arrow used by Radio Shack lo indi- 
cate exponentiation on our printouts Whan antarlng programs pub- 
lished in 90 Micro, you ehoutd make this change 
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look on your video screen This accounts for ths occasional wrap-around 
you will notica in our program listings Don't tat It throw you, particularly 
whan entering assembly listings 
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ingui'i.* should be addressed to. Submissiona Editor, 00 Pina Straat. Pe- 

lartjorough. NM 03459 Include an SASE lor a copy of How to Wnta for 

to Micro:' Payment for accaptad artictas is mada at a rata of epproxi- 
maieiy ISO par pnntad paga, ail rights are purchased 
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Load 80 gathers together se- 
lected programs from this is- 
sue of 80 Micro and puts 
them on a magnetic medium for your 
convenience. It is available on tape or 
disk, and runs on the Models I. HI. and 4. 

If you own a tape system, load the 
Load 80 tape as per the instructions pro- 
vided. If you own a Model I or HI disk sys- 
tem, boot the Load 80 disk and transfer 
the files to a TRSDOS system disk ac- 
cording to simple on-screen directions. If 
you own a Model 4, you must convert the 
programs from Model III TRSDOS to 
Model 4 disk using the Model 4 CONV 
command. 

If you have any questions about the 
programs, call Keith Johnson at 603- 
924-9471. Yearly subscriptions to Load 
80 are $199.97 for disk, or $99.97 for 
cassette. Individual loaders are available 
on disk for $21.97 or on cassette for 
$11.47. including postage. Direct sub- 
scription problems or orders for Load 80 
to Lori Eaton, c/o 80 Micro, 80 Pine St. 
Peterborough, NH 03458. 



Directory 



Basic Plus 

Article: Basic Plus (p. 44) 
System: Model III. 16K RAM 
Language: Cassette Basic/ Assembly 

This Level II Basic enhancement features 
faster operation and 14 new commands. 
Cassette filespec: ONE. TWO 

Finder 

Article: Basic Changes (p. 56.) 
System: Model 4. 64K RAM 
Language: Disk Basic/ Assembly 

The Finder program locates specific strings, 
edits, moves, or replaces lines, and restores 
most lines from programs accidentally erased 
from memory. 

Disk filespec: FINDER/SRC (requires EDAS ed- 
itor/assembler). FND100/BAS. FTND/BAS. 

Edltezt 

Article: Hybrid Vigor (p. 72) 
System: Model ID. 32K RAM 
Language: Assembly 

The Editext text editor lets you enter and 
correct data before processing it 
Cassette filespec: EDIT 
Disk filespec: EDIT/CMD (object code) 
Mapper 

Article: Finding the Right Address (p. 80) 
System: Model 4. 64K RAM 
Language: Assembly 

An address mapping utility for the Model 4. 
Disk filespec: MAD/CMD 

Garbage Demo 

Article. Quit Stalling (p. 86) 



System: Models 1 and HI. 16K RAM Cassette. 
32K RAM Disk: Model 4 (Listings 1 and 3 on- 
ly). 64K RAM 
Language: Basic 

Eliminate "garbage collection" delays and 
cut program execution time. 
Cassette filespec: B. C. D. E 
Disk filespec: GARBDEM1/BAS. GARBDEM2/ 
BAS. GARBDEM3/BAS. GARBDEM4/BAS 

Tape Check 

Article: Tape Me. I'm Yours (p. 92) 
System: Model m. 48K RAM 
Language: Assembly 

Tape Check verifies source code you record 
from EDTASM to tape. 
Cassette filespec: TPECHK 

Create 

Article: Screen Writer (p. 98) 
System: Models I and m. 32K RAM 
Language: Disk Basic 

Develop input screens for your Model I or HI. 
Cassette filespec: F 
Disk filespec: CREATE/BAS 

Formatter 

Article: Easy Input (p. 109) 

System: Model m. 16K RAM Cassette. 32K 

RAM Disk 

Language: Assembly/Basic 

A statement that lets you easily define the 
format for user input in Models I and m Basic 
programs. 

Cassette filespec: INPUT. INPUTB. G 
Disk filespec: INPUT/SRC (source code). IN- 
PUT/CMD (object code). DEMO/BAS. Source 
code requires Apparat editor/assembler 

LMOFFSET 

Article: Tape Transfer (p. 125) 
System: Model HI 
Language: Assembly 

An LMOFFSET modification that loads 
NEWDOS80 EDTASM source files from tape to 
disk. 

Cassette filespec: LMPATC 
Disk filespec: LMOFF/SRC (source code). Re- 
quires Apparat editor/assembler. 

Converter 

Article: From EDAS to EDTASM and Back (p. 134) 
System: Model HI. 32K RAM 
Language: Assembly 

Load EDAS files with EDTASM. 
Cassette filespec: EDTEDS 
Disk filespec: EDTEDAS/CMD 

Message 

Article: BBS Express (p. 152) 

System: Model HI. 48K RAM (requires 2 

drives) 

Language: Disk Basic 

This month's installment creates message 
and data-base files. 
Cassette filespec: H. I 
Disk filespec. LIST1/BAS LIST2/BAS 

3 KEYS 

Article: The Next Step (p. 168) 
System: Model 4. 64K RAM 
Language: Assembly 

A function key filter program for the Model 4. 
Disk filespec: FILTER/SRC (object code). Re- 
quires EDAS editor/assembler. 
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Lori Eaton. 80 Pine St., Peterborough, NH 03458. 
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Micro, Pine St.. Peterborough. NH 03458. (800) 3434728. 
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PLUG IN TO SAVINGS 
WITH POWERSOFT 




SPECIAL VALUES TO LIGHT UP YOUR CHRISTMAS! 

Great for gifts. Perfect for you. But order today! 

These one-time holiday prices expire December 31, 1984. 



so b3 Super Utility Plus 3.2— Mod 1/111/4(111) or Super Utility --4/4P ... 

J* is ij^rnx Now you can buy this two-year 1st Place Winner at Super Christmas savings! Its a must have program for disk 

Y hi X+t drives Give us a call for details Or see the 5 star review in Oct. '83 80 Micro for Mod till version: for the 
Iaj UM Model 4, see the Sept. '84 issue. Price includes complete manual, binder and MASTER disk. (Backup not included) 



BO powerOOT II 

m HI-RES printer graphics! The fitting gift for your bit-image printer— Epson, Prowriter, Tandy or Okidata 92 93. 



Y f rii-Mta primer gr 
pq (Please specify ) 



bo 



PoweiMAIL Plus— l/lll. 11/12. or Model 4 

PowerMAIL Plus with TexlMerge— l/lll, 11/12. or Model 4 . 

The most powerful, easy-to-use mail/data system you can buy! A Christmas bargain that even converts data 
from 7 other popular mailing systems, saving untold hours of re-entering. (Call to be sure we can convert you. 
(See May '84 80 Micro 4 sta r review.) 



S49.9S 



T J!^PowerDRAW Graphic System -1/111/4(111) _ n S29.95 

^ Add some seasonal variety with our fast and easy screen graphic generator. It can merge screens with your own 
programs. (See June '82 issue 80 Micro for review.) 

$49 95 



$99 9b 
$129 95 
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ST80 III Smart Terminal Program l/lll/4(lll| ^' r| ^ 

—11/12 S99.95 

This legend returns to the marketplace with many new features and enhancements at a new lower price ST80-III 
handles bauds up to 9600, auto-answer autodial, uses most popular modems, has upload download, and will 
configure for most host systems Contains X10-HOST (for calling and using system from afar), and PMS (a 
secure Personal Message System) so people can leave messages, etc . but not get into your computer. Many 
more features! 

Model 4 ToolBelt Utilities $39.95 

This holiday special supports all versions of TRSDOS 6.x. including the new TRSDOS 6.2. (See the 4 star review 

in May 84 00 Mcro.) 

LDOS ToolBox Utilities „ nii . , . ... M9 95 

At this sale price, anyone can learn why Sept 83 80 Micros 4 star review says that these programs perfect 

this use of LOOS'' ___ 



BACKREST 1.3 with RESTORE tor Hard Drives (LDOS or TRSDOS 6) 

If you spend lots of time doing backups, you'll love BACKREST. It can backup a five-meg drive in about 15 
minutes, including files larger than a floppy. Will work with other drives. 



IMPAKT! lor BASIC lor TRSDOS 2 3, TRSDOS 1 3 or LDOS (Mod I or III) 

A time-saving, money-saving choice. IMPAKT features search replace, remove REMS (spaces, colons), com- 
press, decompress, renumber, join lines, move lines, copy lines, decode packed strings, rescue and much 
more! Programs run on unmodified BASIC. _____ 



Stocking Stutter Book Values 

Inside Super Utility Plus 3.0/3/2 For beginners and experts alike. 

Super Utility Plus 3.2 Tech Manual For experts only 

TRSDOS 6 Programmers Guide Required reading for Model 4 programmers. 



S71 45 



$29 95 



$15.00 
$12.50 
S1900 



Remember, these special Christmas values are available through December 31, 1984 only. 
Orders at these sale prices cannot be accepted after that date. So call or mail in your order 
today. (Be sure to specify computer and/or printer.) 

Shipping/handling: $3 (U.S. and Canada); $10 (for airmail service on foreign orders). For COD. 
or Blue Label, include an additional $3. Texas residents, add 6% sales tax. 
VISA and MasterCard welcome. 



Products from Breeze/QSD, Inc. 

11500 Stemmons Freeway. Suite 125, Dallas, TX 75229, 
(214) 484-2976 



3E 



r____j 



k- See List ol Advertisers on Page 176 
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SIDE TRACKS / by Eric Maloney 



Marketing Programs 
The Software Sell 



Marketing software is, to put it 
bluntly, a pain in the south 
pole. 

"We'd love to get out of the soft- 
ware business," said Tandy CEO 
John Roach at a recent lunch in Bos- 
ton. After all, he said, Radio Shack 
makes stereos and tape decks, but 
leaves the record and tape business to 
others. Why shouldn't the same strat- 
egy apply to their computers? 

I can understand why the people in 
Fort Worth are ambivalent about 
marketing software. If I were in their 
shoes, I'd feel the same way. That's 
where they get most of their bad press 
and customer complaints. Take 
CP/M Plus, for example. Radio 
Shack was excoriated by TRS-80 users 
for delaying its release by six months, 
then lambasted for the product's defi- 
ciencies. Model III SuperScripsit re- 
ceived similar treatment. 

Customer support makes software 
retailing an even greater chore. With 
its large catalog of packages, Tandy 
has doomed itself to an endless stream 
of angry phone calls and critical let- 
ters. Users find hidden bugs. Disks 
crash. Computer novices don't under- 
stand how programs work. Software 
turns out to be incompatible with cer- 
tain hardware configurations. Proof- 
readers miss errors in documentation. 
It all adds up to a monumental test of 
Tandy's resources and good will. 

If recent developments are any indi- 
cation, Roach may get his way. Con- 
sider the following: 

• Tandy has gone exclusively to third- 
party developers for its Model 2000 
software. 

• Tandy has begun to sell third-party 
software with the original manufac- 
turers' own packaging. 

• Tandy is now selling third-party 
products through its Express Order 
service, including some that compete 
with packages Tandy sells under its 
own name. 

• Tandy sponsored five shows in Sep- 
tember and October that featured oth- 
er vendors' software. 




These represent an abrupt about- 
face in Tandy thinking. For the first 
time, Tandy recognizes the fact that 
other companies exist in the TRS-80 
marketplace. 

Some of these companies are skepti- 
cal. I've heard apocalyptic stories of 
software developers who have submit- 
ted programs to Radio Shack for re- 
view, only to have their work languish 
forever in a dark drawer somewhere. 
Many I/III/4 manufacturers weren't 
invited to the Tandy shows. Others 
complain that Tandy won't provide 
them with new computers before of- 
ficial release, thus delaying software 
development. 

The people at Tandy are, apparent- 
ly, still very selective about the compa- 
nies they choose to support, and 
sometimes give support that is barely 
adequate. This is a big mistake. The 
slumping TRS-80 market will only be 
stimulated if all companies, no matter 
how large they are or what types of 
products they make, are encouraged 
and nurtured. 

Nevertheless, the signs are that Tan- 
dy is moving in the right direction. 
And while changes in Tandy's soft- 
ware retailing habits may be motived 
primarily by self-interest, the results 
can only be beneficial to manufactur- 
ers and users. Third-party developers 
will have more access to the market, 



and users will have a greater variety of 
products to choose from. 

Meanwhile, Tandy will increasingly 
emphasize hardware development, 
which is undoubtedly their strength. 
With Tandy producing quality hard- 
ware and support companies contrib- 
uting quality software, the TRS-80 
line's appeal can only improve. 

Short Takes 

Warning: The arrow keys on the 
new Model 4 keyboard are arranged in 
a cluster. If you've got a lot of Model 
III arcade games that use the arrow 
keys, be prepared to either toss them 
in the dumper or grow a couple of fin- 
gers in your palm .... 

Ex-subscribers to Tandy's TRS-80 
Microcomputing News will be happy 
to know that 80 Micro is picking up 
that magazine's "Bugs, Errors, and 
Fixes" feature. The column will de- 
scribe problems with software pack- 
ages marketed by Tandy — ■ 



Wayne Green Reunion 

The 25th anniversary of my start- 
ing 73 Magazine is coming up in a 
few months, so it seems like a good 
time to throw a small party for 
Wayne Green alumni. This year's 
meeting is on Nov. 15 at Comdex in 
Las Vegas. If you've worked for me 
during the last 33 years, get in touch. 
I'm having some special coffee 
mugs, with the logos of all our maga- 
zines, made as souvenirs. Who 
knows — I may spring for T-shirts 
next year. 

I want every Wayne Green alum- 
nus to be there, whether from Wayne 
Green Inc., Wayne Green Enterpris- 
es, or before. As far as I know, with 
the exception of two people who be- 
trayed me, one of whom is dead and 
the other completely disappeared 
from the publishing and computer 
scene, every alumnus is still a darned 
good friend. 

— Wayne Green 
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These were printed by DOTWRITER on an Epson MX 80. 



What You Can Do With. 
DOTWRITER 4.0! 

Now available for the Model 4, too! 



DOTWRITER lets you create 
spectacular, eye-catching 
letterheads, catalogs, invito* 
tions, or even books. It is just what 
you need to turn your dot-matrix print- 
er into a versatile typesetting ma- 
chine. And it's available for the Model 
4 (yes. in native mode) as well as for 
the Models I and III. 

What is DOTWRITER? 

DOTWRITER uses the "bit-im- 
age graphics" of your printer to 
produce the kinds of stunning re- 
sults shown inside the box. It is a 

full-function text printing program, so 
you can inter-mix different character 
sets, do centering, paragraphs, pagi- 
nation, magnification, draw horizon- 
tal and vertical lines, reversals (white 
on black), and even print right-justi- 
fied proportional text. 

DOTWRITER includes the printing 
program, complete documentation, 
and fourteen useful sets of typefaces 
(60 to 90 characters in each set). We will 
also give you the 105-page Letterset 
Reference Catalog free with your 
order. 

To use DOTWRITER, just write your 
text with any popular TRS-80 Word 
Processor, add the necessary format- 



ting commands, and DOTWRITER will 
do the rest. 

25 more disks are available 
separately. Each ^-z^t>^ 
has 3-12 complete /^^|pS\ 
typefaces (60-95 f( CjLJ \\ 
characters in y n-caders' choice_te ^ 
each set). "^^^rnicro,// 

These disks cost 




Send for free print samples! 

We've only shown you a few of the 180 
DOTWRITER fonts. If you want the best 
in graphics printing, we suggest you 
order DOTWRITER today, toll-free. 

Please specify printer and computer 
when ordering. 



less than S25 each, 
and may be pur- 
chased at any time. 

If you want to create your own 
logos, modify our typefaces, or even 
design entirely new typefaces, then 
you will also want to order the "Letter- 
set Design System'' (LDS). We offer LDS 
at half-price when you order it along 
with DOTWRITER. LDS operates in 
Model III mode on the Model 4. 

Versions are available for Epson MX 80 
with Graftrax. MX-100 with Graftrax-Plus. 
RX 80. FX-80, C. ITOH 8510'1550. Microline 
84/92/93; Radio Shack's DMP series 200- 
2100. CGP-220 & Gemini 10X. 15X. Please 
specify printer and computer! 

Our print samples were done on an Ep- 
son. Sizes vary on other printers. Some of 
the samples shown here are taken from the 
additional Letterset disks 

Two disk drives and at least 48K of mem- 
ory are required. LDS is not available in 
native Model 4 mode. 



DOTWRITER 

(Models I, ni) $79.95 

DOTWRITER (Model 4) 99.95 
Letterset Design System 39.95 
Special: DOTWRITER 

and LDS 99.95 

Additional Letterset 

disks (4-12 per disk) 

17.95 and 24.95 
Letterset Reference 

Catalog 10.00 



ORDER NOW, TOLL-FREE 
(800) 824-7888, oper. 422 
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Dept C. Box 560, No. Hollywood, CA 91603 
(8181 764 3131 Information and Same Day Processing 

MC. checks. COD Please add S3 00 shipping 
ada S15 00 overseas, sales tax >n Ca 




The Premier Word Processor for 
Your TRS-80 Model I, III, or 4 




We are proud to offer you 
the one Word Processor 
that will satisfy all your 
writing needs: ALLWRITE. It sets 
new standards for text editing and 
printing, and will give new life to 
your TRS-80. Let us tell you why. . . 

In an attempt to push the public 
into expensive 16-bit computers, many 
manufacturers have been saying that 
the TRS-80 is obsolete. The truth is that 
the software, not the hardware, makes 
the difference. And the best word proc- 
essor of all is now available oniy on 
the humble TRS-80, not on those ex- 
pensive 16-bit machines! 

ALLWRITE is based on the proven 
methods that made NEWSCRIPT the 
most popular independently produced 
TRS-80 word processor, but it also has 
the speed and new features our cus- 
tomers have asked us for. ALLWRITE 
will save you time and let you produce 
the highest-quality, most professional- 
looking letters, term papers, and re- 
ports available on a micro-computer. 

Allwrite Can Save You Time! 

Reads a 25.000 character file (10 
printed pages) from disk in SIX SEC- 
ONDS... does a global search-and- 
replace in FOUR SECONDS . . . outruns 
even the fastest popular micro-printer. 



ALLWRITE'S Screen 

Handling Makes Word 

Processing Easier 

Than Ever 

Change text width at any time; 
wide lines shift left and right as you 
type. ALLWRITE preserves double 
blanks between sentences, uses the 
entire screen for text, and displays a 
complete Status Screen at the touch of 
a key. Scroll by line, partial screen, full 
screen, to top or end of file, or to any 
marked point. Move cursor by charac- 
ter, word, tab, line, or screen. 

You can set and change on-screen 
tabs and store them on disk. The print- 
time tabbing features are incredibly 
versatile: they allow left, right, and 
centered tabs, and even line up your 
decimal points. 

ALLWRITE shows you where you 
forgot to turn off underlin- 
ing, boldface, italics, or 
double-width. Special on- 
screen Preview feature 
shows page breaks and 
page layouts . . . including 
underlining and boldface 
. . . without annoying blink- 
ing or screen flicker. In 
"Summary" mode, ALL- 
WRITE quickly flags for- 
matting errors without 



These were printed by ALLWRITE: 
shown 20% actual size. 

wasting time printing all the text. 
These standard features make docu- 
ment preparation faster and easier 
than ever! 

State-Of-The-Art 
File Handling 

There is no upper-limit on docu- 
ment size with ALLWRITE, because it 
chains files backwards as well as for- 
wards, even across diskettes. Switch 
from one chained file to another in less 
than six seconds by pressing two keys. 
Select portions of other files for inclu- 
sion at print time... great for stock 
paragraphs. 

ALLWRITE salvages text from bad 
disks! If a sector goes bad, you won't 
lose the entire file, because it will skip 
bad sectors, read the rest of the file. 



TAKES FULL ADVANTAGE OF YOUR 
MODEL 4. 

The model 4 version of ALLWRITE uses 
the entire 80-by-24 screen. On a 64K ma- 
chine, you can edit over 34,000 charac- 
ters of text. On a 128K machine, you can edit 
THREE FILES AT THE SAME TIME! The 
second and third files can be over 32,600 char- 
acters each, for a total of almost 100,000 
characters of text in memory. 



and then show you where the lost text 
belongs. This advanced error recovery 
turns a disaster into a feeling of pro- 
found relief. 

User-Definable Soft Keys 
Reduce Typing Time 

You can store 22 phrases or com- 
mands at a time into "soft-keys." then 
press just two keys to retrieve them. 
This makes frequently-used phrases 
and formatting controls a snap to use. 
You can store these definitions on disk 
and build a library of hundreds of pre- 
programmed keys to fit every one of 
your applications. 

Our specially-designed templates 
fit right on your keyboard to let you see 
your settings at all times. Each tem- 
plate is also a Reference ("Cue") Card, 
so it is always right in front of you 
when you need it, without using up 
valuable screen space. 

ALLWRITE Is Easy To Learn 

ALLWRITE's commands and con- 
trol keys are easy to remember be- 
cause they use the first letters of 
common English words: 'CE' stands for 
'Center,' 'Search' and 'Replace' do just 
that, and so forth. The on-line HELP 
menu offers over fifty screens of topics. 

NEWSCRIPT's documentation was 
acclaimed in every review, and 
ALLWRITE's 350-page book is even bet- 
ter. Portions of it are designed for be- 
ginners, with every feature clearly 
explained in step-by-step tutorial 
style. Since you won't always be a be- 
ginner, other parts of the book offer ad- 
vanced topics. There is a cross- 
reference summary chapter, a 14-page 
comprehensive index, and a detailed 
Table of Contents. We've been devel- 
oping computer programs and man- 
uals for over 20 years, and understand 
the importanceof good documentation. 

To make installation easy, we in- 
clude Tiny DOSPLUS for the Models I 
and III, and special, pre-tailored ver- 
sions of both TRSDOS 6.2 and DOS- 
PLUS IV for the Model 4, all at no extra 
charge. The Model I and III versions 
work equally well with all major 
DOS's. 

PROSOFT'S On-Going 
Customer Support 

Perhaps the best reason of all for 
having ALLWRITE is the continuing 
support we offer you: friendly, expert, 
direct support that is unsurpassed in 
the micro-computer industry. There is 
no time limit to our support: if you are 
our customer and you need help, just 
call or write. We give free updates for 
90 days, and charge little or nothing 
for minor updates thereaftei. 



Customer Comments 

"This is the best software package 1 
have ever received . ..superb, easy to 
use. fast, and has more features than 
the business word-processor at the 
officer (E.R.L.) 

"ALLWRtTE will soon be the barom- 
eter that others will use to compare 
their products to. For the money and 
functions, there is no comparison '.' 

(J.G.) 
"Your company and products have 
to be one of the strongest factors 1 can 
think of for keeping me with the 
TRS-80!" (J.R.H.) 

"NEWSCR1PT is the Cadillac of word 
processors. ALLWRITE is the Mercedes 
Benz!!" (B.E.) 

"...a very readable manual!' (D.S.) 



BENEFITS OF OWNING 
• * ALLWRITE * * 



// Word Processing is important to 
you. PROSOFTs ALLWRITE is the best 
choice you can make. The clean, pro- 
fessional appearance it adds to your 
letters and reports will make an excel- 
lent impression on people. We will be 
happy to send you free print samples 
so that you can see for yourself how 
good ALLWRITE will make you look. 

You probably know that quality 
word processors for CP/M and the IBM- 
PC sell for S300-500, and they don't 
have ALLWRITE's capabilities or speed 
...or PROSOFTs proven, on-going 
support. Now, for a fraction of the cost 
of a new computer, you can have the 
most complete word processor of all. 
And you won't have the headaches of 
starting all over again with a new, 
different computer. 



Note to college students: with its 
Footnote, Table of Contents and Index 
features, ALLWRITE is ideal for your 
reports and Term papers. 



HUNDREDS OF USEFUL 
CAPABILITIES 

ALLWRITE comes with just about 
every useful word processing feature 
...standard. Here are some high- 
lights: excellent right-justified pro- 
portional printing on most printers 
having that ability; powerful Form Let 
ter and Mailing Label preparation; In- 
stant counts of words, characters, 
lines, changes; block Move, Copy, De- 
lete, Putfile, Getfile. and List; delete 
by character, word. line, sentence, 
paragraph, or block; insert and one- 
key insert; great RS-232 printer sup- 
port; accepts all 256 ASCII codes from 
keyboard; intermix pitches on same 
line (printer-dependent); 1.5 line spac- 
ing, 6, 1. 8. 12 lines per inch printer- 
dependent); does multiple-columns on 
all printers; perfect alignment of hang- 
ing indents; variables, logic state- 
ments, conditional printing; wildcard 
Directories; integrated with Electric 
Webster and DOTWRITER for Models 1, 
III, and 4 (these are sold separately); 
"Legal" line numbering; paragraph, 
list, and figure numbering; supports 
most popular printers (all "printer driv 
ers" included); compatible with high- 
memory drivers; fully explains all 
DOS and ALLWRITE error messages; 
wildcard search-replace; tabs, search- 
replace, other settings remembered 
across files; word reversal; up to nine 
levels of boldface; flexible page titles; 
footnotes at bottom of page or end of 
document; Table of Contents and In- 
dex generation; and PROSOFTs un- 
matched text formatting and printing 
capabilities. 



Attention NEWSCRIPT Owners 

You can trade in your copy of NEW- 
SCRIPTat very substantial savings. 
Please call our technical line for 

details How To Order 
You can order by phone or mail. For 
quickest delivery, call our Technical 
Support line. Please specify your TRS- 
80 model (I. Ill, or 4, 48K, at least two 
disk drives), and your printer(s). Our 
price includes normal shipping in the 
U.S. and Canada. The sooner you or- 
der, the sooner you will begin to bene- 
fit from the ALLWRITE! Word Processor. 




Holiday Special 

§ *195.00 



ORDER NOW, TOLL-FREE 

(800) 824-7888, oper. 422 








® 



Box 560, No. Hollywood, CA 91603 
(818) 764-3131 for Technical Information and Same-Day Processing. 

Terms: VISA. MasterCard, checks. C.O.D. 
California residents please add sales tax. 
Most orders tilled within one day. ^30 
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CP/M Plus 

John Harrell, in his review of 
CP/M Plus (August 1984, p. 31), 
writes that the program is bug-free. 
Yet, when you redefine the three func- 
tion keys with the Setup utility and try 
to make the changes permanent, the 
boot track is wiped out. 

Leigh L. Klotz 
McComb, MS 

Mr. Harrell is much too optimistic 
in his review of CP/M Plus. In theory, 
CP/M Plus does allow access to a 
greater variety of software, yet its un- 
usual disk format negates any such ad- 
vantage. Further complicating the 
CP/M Plus issue is the lack of multi- 
ple-format utilities available. 

Another serious defect lies in the 
fact that the BIOS, the most impor- 
tant source code in any CP/M system, 
is absent. Had Radio Shack supplied 
this code, the nonstandard disk for- 
mat problem wouldn't be so impor- 
tant. To make matters worse, the only 
usable source code file on the disk is 
one configured for a different ma- 
chine! 

David Goodwin 
Pittsburgh, NY 

John Harrell's review of CP/M 
Plus is misleading. In fact, because of 
CP/M Plus's many bugs, I seriously 
doubt the value of this operating 
system. 

CP/M Plus increments all dates en- 
tered by 1; for example, if you enter 
the date as April 14, the system carries 
the date as April 15. Because of this er- 
ror, the Date function is useless. 

Also, BIOS permits only haphazard 
functioning of the Caps key, while the 
type-ahead buffer can handle only one 
character. Other problems include the 
keyboard scanner, which is too slow, 
and the Dump utility, which doesn't 
give ASCII listings along with the hex- 
adecimal listings. 




In addition, this operating system 
provides less TPA, even in its banked 
version, than CP/M 2.2. This is frus- 
trating when you consider that CP/M 
Plus addresses an additional 64K of 
RAM and it takes three times as long 
to boot up as CP/M 2.2. In essence, 
CP/M doesn't work as it should. 

Jerry Wagers 
Ft. Lewis, WA 



Harrell Responds 

After some additional research, I 
agree that CP/M Plus deserves a 
much lower rating in the "bug-free" 
category. And there's a serious defi- 
ciency in the Setup utility which de- 
stroys the boot track on a system disk 
using the unbanked version of the 
BIOS. I used only the banked version, 
and don 't consider the unbanked ver- 
sion a viable option for anyone. 

The incorrect date is caused by 
poorly written code. It's supposed to 
be incremented whenever the system 
clock counts through 00:00:00. Unfor- 
tunately, the boot code interrupts pri- 
or to storing the time and allows the 
date to be incremented. You can re- 
peat the command by typing in DA TE 
MM/DD/YY 00:00:00 at the CP/M 
Ready prompt. 

What is supplied on the disk are 
those files that need not be changed 



from computer to computer. The only 
two files missing are CHARIO.ASN 
(the character device driver) and the 
disk input/output modules. The 
source code, under most circum- 
stances, isn't included with the system. 

If you're familiar with the disk pa- 
rameter header, the disk parameter 
block, and the skew table, you don't 
need these routines. Simply modify 
these parameters to reconfigure your 
disk formats. 

The type-ahead function works on 
the principle of scanning the keyboard 
once during each clock interrupt and 
storing the character found. It's im- 
perative to disable the clock interrupts 
while reading the disk so that the oper- 
ating system won't lose data bytes. 

To get the most from CP/M Plus, 
you'll need Montezuma Micro's 
CP/M 2.2. The INTERCHG utility 
reads, writes, and formats the Radio 
Shack CP/M Plus disk with ease. 

Tandy's release of the 700 upgrade 
should correct the bugs noted by many 
CP/M Plus users. 

John B. Harrell III 
Washington, DC 



WIBASIC 

While Ronald Cangro's review of 
WIBASIC (July 1984, p. 186) is, for 
the most part accurate, his using 
ZBASIC's advertised benchmark re- 
sults is ill-advised. Advertisements op- 
timize a product's features, so it would 
have been more instructive to use pro- 
grams unconnected with either com- 
pany. 

In addition, some of Cangro's 
statements about ZBASIC are inaccu- 
rate. Contrary to what's stated in the 
review, ZBASIC doesn't include an 
interpreter; rather, it uses the resident 
Disk Basic interpreter. 

Also, the review cites WIBASICs 
incompatibility with Basic, while 
ZBASIC's compatibility is listed as 
"limited." WIBASIC wasn't designed 
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to be directly compatible, yet we've 
found that it's far easier to port to 
WIBASIC than to ZBASIC. While 
Simutek's product supports more 
Basic key words than WIBASIC, the 
key words don't perform the same 
functions as they do in conventional 
Basic. This, I feel, exaggerates ZBA- 
SIC's compatibility with Basic. 

Lou Witt 

WittSoft Corporation 

Orlando, FL 



NICE Response 

NICE, the New Interactive Com- 
puting Environment, was first re- 
leased in 1983. Since then, NICE has 
been upgraded several times. The sec- 
ond release featured a VisiCalc inter- 
face, an enhanced data base, and 
screen management. The third release, 
currently in production, provides win- 
dow capabilities, concatenated keys in 
data base, a sophisticated search facil- 
ity, and many other features. 

The review in the October 1984 is- 
sue of 80 Micro (p. 39) is either for 
the first release, or some strange com- 
bination of the first and second. For 
example, the described PF key opera- 
tion is definitely for the original 
NICE, which did not support the 
Model 4, while the instructions for the 
PF keys mentioned in the review be- 
long to the second release. 

The current release does support the 
Model 4 control key, as well as the 
three function keys, although the re- 
view states otherwise. This discrepan- 
cy could be the result of the substantial 
time that passed since NICE was sent 
to 80 Micro for review (about one 
year). 

The reviewer complains that 
NICE'S data-base files are small and 
useless, the tutorial is very limited, and 
the help screens are insufficient. What 
he failed to understand is that NICE is 
a collection of samples, demonstrating 
different techniques and presenting 
ideas as to what you can do with it. 

NICE'S primary function is to pro- 
vide a powerful environment that the 
user can easily customize for his needs. 
It provides a set of building blocks to 
build applications: menus, screens, 
data-base files, reports, forms, and a 
high-level development language 
(ICPL). 

Since the review was done for an old 
version of NICE, many of the techni- 



NICE's primary function 
is to provide 

a powerful environment 
that the user can 
easily customize. 



cal details and problems mentioned 
are inaccurate. For example, the PF 
keys do work correctly, in DOS func- 
tions the @ sign isn't converted to am- 
persand, and the data base does allow 
full search capability. 

In general, however, the technical 
features and capabilities were not cov- 
ered at all. There was nothing said 
about screens and programmable 
function keys, new techniques for 
menus, scrolling, the inquiry facility, 
or the uniqueness of the data base. 
And nothing was said about the ICPL 
language. 

We agree that the manual could be 
better. It should be better. We are cur- 
rently working on a new version that 
incorporates recommendations from 
our users. 

Earlier versions of NICE did lack a 
number of features. The data base was 
not as sophisticated as it is now, 
screens did not have scrolling or win- 
dowing, and the inquiry facility was 
limited. But we do support our clients. 
When they have problems, we try to 
solve them (if possible) and they al- 
ways have a couple of numbers to call 
for help. 

However, the entire attitude was to 
show the system as absolutely unus- 
able. Some of the comments were mis- 
leading: "(NICE is) presented as being 
easy to customize" (and not a word 
whether it is or is not); the inquiry 
menu "allows retrieval only. ..in an 
abbreviated form" (isn't this what the 
word inquiry means, a quick look at 
something?); that, compared to Lotus 
or T/Maker, "NICE falls far short" 
(Lotus is an integrated spreadsheet, 
NICE is an integrated environment). 
We are not familiar with T/Maker, 
but according to what was mentioned, 
it, too, is probably an integrated 
spreadsheet, and also is in a different 
category from NICE. 

Many TRS-80 users are technically 
capable and creative people who can 
use the full power of the system. This 



review would not give them any useful 
information on NICE. 

Eugene Schyklar 

President 

XYZT Computer Dimensions Inc. 

More From Montezuma 

In the August 1984 Input column 
(p. 12), Michael Vournazos expresses 
dissatisfaction with Montezuma Mi- 
cro's version of CP/M for not keeping 
track of line feeds sent to the printer. 

This problem existed with older Ra- 
dio Shack printers that used nonstan- 
dard codes. Radio Shack has since 
standardized its codes, alleviating the 
problem Vournazos described. 

John Lancione 

President, Montezuma Micro 

Dallas, TX 

Basic Understanding 

I've just finished reading and work- 
ing through Richard Ramella's Basic 
Takes. The program listings are ex- 
plained in full detail and are easy to 
understand. 

I'm looking forward to increasing 
my understanding of Basic with the 
help of Basic Takes. 

Ralph H. Turner 
Oberiin, OH 

7-Up 

The artist for your August 1984 
cover goofed. Dice are always arranged 
so that the opposite sides add up to 
seven. His dice add up to seven on ad- 
jacent sides. 

/. Bradley Flippin 
Arlington, VA 

We know a guy who tells strangers 
when his socks are inside-out. Must be 
a buddy of yours. — Eds. 

Death of CLOAD 

I regret to inform the TRS-80 world 
in general, and former subscribers of 
CLOAD magazine specifically, that 
CLOAD is now defunct. 

CLOAD and its assets are now in 
the hands of the courts. Again, I'm 
sorry, and thanks to all of you for six 
years of TRS-80 fellowship. 

Dave Lagerquist 

Editor, CLOAD Magazine 

Santa Barbara, CA 
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FEEDBACK LOOP / by Terry Kepner 



Send any questions or problems 
dealing with any area of TRS-80 mi- 
crocomputing to Feedback Loop, 80 
Micro, 80 Pine St., Peterborough, NH 
03458. 



QbI have a Model I with two 
■ MPI-2 double-headed drives, 
LNW doubler, DOSPLUS 3.5, and 
Gold-Plug 80s. I live in the middle of 
Manhattan on the eighth floor of an 
older building. My computer usually 
functions well, but at certain hours it 
just goes crazy (reboots, etc.). This 
seems to happen when traffic is 
backed up on the street below. The on- 
ly engineer I know says it's a power 
line problem. Is this curable? Will 
I have the same problem with an- 
other computer? (Joel Reed, New 
York, NY) 

A I Sounds like a power problem 
■to me, too. If so, an uninter- 
ruptible power source (UPS) would 
definitely solve the problem, as it 
would supply any additional power 
needed when the line supply drops be- 
low a predetermined level. Power 
surge and voltage spike protection 
would also be called for in this case. 
Unfortunately, most UPS units cost 
anywhere from $300 to several thou- 
sand dollars. 

Another computer might have the 
same problem, but it depends a great 
deal on the power supply of the sys- 
tem, and how tolerant it is of power 
line fluctuations. 



Qa I noticed a couple of inaccura- 
■cies about Basic in the Febru- 
ary Feedback L^op (p. 22). First, the 
format of an in-memory line of Basic 
code is: a 2-byte pointer to the next 
line, a 2-byte hexadecimal (hex) repre- 
sentation of the ASCII line number, 
the Basic code (which can be up to 255 
bytes long, although Basic's input rou- 




tine uses a buffer limit of 240 charac- 
ters), and the line terminator, a zero 
byte (a carriage return, decimal 13, 
hex 0D, if the file is stored on disk in 
ASCII format). 

Second, the line of Basic code isn't 
converted to machine language. In- 
stead, Basic scans the line for a Basic 
code token, which indicates the loca- 
tion within a ROM table of the ad- 
dress of a corresponding ROM rou- 
tine. The program branches to that 
ROM routine and executes it. Basic 
then returns to the line and continues 
scanning for tokens until it reaches the 
end of the line. (Richard Wiley, 
Honolulu, HI) 

A a A poor choice of words on my 
■ part — the lines aren't convert- 
ed, but interpreted as a guide to which 
ROM routines to use. Thanks for giv- 
ing us a better description. 



QjOur Naval Base has about 70 
■TRS-80s with C.ltoh Prowrit- 
er 8570 A and Starwriter F10 printers. 
We've located a firm that sells 
SuperScripsit drivers for these print- 
ers, but we've been unable to find sim- 
ilar drivers for our Business Graphics 
Analysis Pak software. Any ideas 
about where we can buy drivers or 



develop our own? (R. Dornick, U.S. 
Navy, Port Hueneme, CA) 

Aal don't know of a supplier; can 
■ anyone help? 



Q B B.L. of Deerfield, IL (October 
■ 1983, p. 333) wanted to use 
braces to embed typesetting codes with 
Scripsit. Volume 10 of the Encyclope- 
dia/or the TRS-80 gives a formula for 
braces in Scripsit. In the lowercase 
mode, you press the Y and I keys si- 
multaneously and then press the K key 
to get the left brace; y-i-m gives you 
the right brace. 

Now for my question; when is the 
proposed book of patches to Scripsit 
going to be released? (John Barach, 
Sexsmith, Alberta) 

A a "Character Cache" in the 
■April 1984 80 Micro (p. 118) 
provides three-letter combinations for 
braces and eight other characters. 
"Scripsit Extras" in the August 1984 
issue (p. 68) lists patches for 11 extra 
characters, including braces. 80 Micro 
is no longer planning to publish a 
book of Scripsit patches. 



Qa I have a Model I with a Micro 
■ Design 2 System Interface ex- 
pansion board and a Radio Shack 
doubler. MULTIDOS is the only dou- 
ble-density DOS I can get to work. 
I've tried TRSDOS 2.7DD, NEW- 
DOS80 2.0, and DOSPLUS. Each 
failed to boot up, giving disk error 
messages instead. MULTIDOS works 
fine, but I'm curious about why I'm 
having trouble with the others. Any 
ideas or fixes? (M.D. Hall, Montgom- 
ery, AL) 

A a I'm sure Vernon Hestor 
■ (MULTIDOS's author) is glad 
his DOS works with your system, but I 
can't tell from your letter why the oth- 
ers don't work as well. Anybody else? 
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Newclock-80 $69.95 

The right time atthe right price! Keep the time and date with quartz accuracy, 
even when your computer is off. The backup lithium battery (included) will last 
for over 2 years. Software on tape or disk, please specify. Use "TIMESET" once 
to set the clock. Use "SETCLK" to set your computer's internal clock (at power 
up) or use "TSTRING" so that the "TIMES" function reads the Newclock. 
Connection Model I plugs into the keyboard or expansion interface. Model III plugs into the 
50-pin I/O bus Comoatible with all operating systems 




y\ODi 

ON E/l 



Printswitch $59.00 

Do you have 2 printers? Get a Printswitch. Stop plugging and unplugging 
those printer cables. With the Printswitch. you can have 2 printers connected to 
your computer and you can select either one at the flick of a switch Works with 
any printer, plotter, or device that uses the oarallel printer port. Simply plug the 
14 inch Printswitch cable into your computer, and plug your existing printer 
cables into the Printswitch. This is the nicest unit on the market Superior quality 
board with gold plated edge connectors, ^or Models I. III. 4 and 4P. 



<m 



Alpha Joystick $27.95 

When it's time for fun, don't be without your Alpha Joystick. Do you know 
that most action games are Joystick compatible? Stop pounding on your 
keyboard and enjoy real arcade control. The joystick can also be used with 
BASIC orograms; simply do J= I NP(0) to read the joystick position 18 directions 
and fire button). Model I: plugs into keyboard or exoansion interface. Model III, 
4 and 4P: plugs into 50-pin I/O bus. The Alpha Joystick comes fully assembled 
and tested, ready to plug in and enioy. (Specify Model I. or Model III 4). 



1 
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lnterfacer-80 $159.00 

Low cost input and output device. The outputs consist of 8 relays (rated 2 
Amp @1 25V). easily controlled using "OUT" commands, ^or example, OUT 0.0 
turns all the relays off. Eight LED's show the states of the relays. The 8 inputs 
are optically isolated, so it's safe and easv to connect external devices 
(switches, sensors, thermostats, etc.). Simple "INP" commands read the inputs 
Connection Mod l:40pinbus Mod III. 4 4P: requires 50-pm I/O bus convener i$39 95) plugs 
into 50-oin I/O bus Comes complete with power supply, cable and detailed manual 
(Up to 8 mterfacers can be connected to vour TRS 80 using our Y- cables^ 

Analog-80 $139.00 

8 channel 8 bit Analog to Digital converter. Your TRS 80 can read voltages 
temperatures, pressures, light levels, etc. • Input range: to 5.1 Volts. 
• Resolution: 20mV. • Conversion time: 1 20 microseconds. In BASIC, you can 
takeupto 100 readings per second. • Portaddress: selectable. Upto8 Analog- 
80's can be connected to your TRS-80 for a total of 64 channels! 
Connection: Model I: 40 pin I/O bus Model III 4 4P: requires 50-pin bus adapter iS39 95) 
Comes complete with power supply, cable and manual 





Special Cables 

Disk drive extender cable (8")...C160:$g.95 

Y-CableforModlbus(40pin): •X2-40..S29 »X3-40 $44 »X4...$59 •X5.S74 
Y-Cable for Mod 3 & 4 bus (50-pin): • X2-50...S34 •X3-50..S49 •X4-50.S64 
Disk drive cable (34 pin): •2-dhve...Cl62:S32 •4-drive C1 63:545 
Extension cable. 4 foot: • For printer and drive (34-pin)...C165:$22 

• For Mod I bus (40-pm)...C1 67:524 • For Mod 3& 4 bus (50-pin) C169:$28 
Keyboard to E/l (40-pin, 8").- C161:$21 If this is confusing send for our Cable c iyer. 
Our cables are made with high quality gold plated connectors to ensure utmost reliability 



NO RISK 

We know that ordering by mail can sometimes 
be a hassle, but with Alpha, you are fully 
protected. 

1 ) Our 1 5 day money back guarantee protects 
you from disapointment 

2) All our products are tested on a TRS-80 and 
waranteed to 90 days (parts & labor) 

3) We ship 90% of our orders within 24 hours 

4) We are committed to help you 



Green Screen $1 2.50 

Do youreyesa favor, put on a green 
screen. Tensofthousandsareinuse 
for a good reason: they work Con- 
trast is enhanced and eye fatigue is 
greatly reduced. Ourgreen screen is 
curved: it fits right on the face of the 
tube (Rts Models I.II.III.4 12,16) 



l& 



XS X4 X3 X2 



THE 

GREEN 
SCREEN 



jm ALPHA 



79-04 Jamaica Ave. Woodhaven, NY 11421 *\1 (212) 296-5916 



Toll Free Order Line 

800-221-0916 

Orders Only NY & into call 

(212) 296-5916. 

Hours 9-5 Eastern Standard Time 



Add S3 00 Pet Order For Shipping 
And Handling We Accept Visa 
Mastercard Chechs MO COD. 
Add Sales Tax Overseas PPO 
APO: Add 70%.Dea/er Discounts 
Available COD aao $3 00 en* a. 
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Qgl own a 48K dual-disk drive 
■Model III, and I use Scripsit 
quite a bit. I recently purchased a 
Holmes Engineering VID-80 128K 
CP/M modification board — mostly 
for its 80-character by 24-line screen 
format. However, Scripsit won't load. 
Also, I find most of the commands us- 
ing the break key as the control key 
don't work (reverse video, for one). 
The manual says to contact Holmes by 
letter, not by phone. I've written two 
letters asking for help and I haven't re- 
ceived an answer yet. Do you know of 
any patches to make Scripsit work 
with the VID-80? (Charles Donsi, Riv- 
iera, AZ) 

A m Unfortunately, the VID-80 
■ board won't work with Scrip- 
sit or any program that directly ad- 
dresses the Model III video memory 
rather than using the device control 
blocks (DCBs) that point to the video 
driver routines. When you boot up 
your system, the VID-80 board copies 
the Model III ROMs to its on-board 
RAM and modifies the video routines. 
So any program that directly addresses 
the Model III video memory bypasses 
the changed code that the VID-80 
board uses and goes to the wrong 
memory locations. 

The 80-character by 24-line display 
is restricted to the CP/M operating 
system, to Basic programs that don't 
use POKEs to put data on the video, 
and machine-language programs that 
honor the Model III DCBs. I don't 
know of any patches to Scripsit to 
make it work with the VID-80 board. 

I, too, have been having difficulty 
communicating with Holmes. I'd sug- 
gest calling them and talking with a 
technician. But be forewarned — the 
technicians are busy, so you might not 
be able to get through to one on your 
first call. 



Q a l use a 16K Model 100 on 
■ business trips as a portable 
typewriter to record notes for trans- 
mission to my office. I tried using my 
high-quality microsette recorder, an 
Aiwa TP-M7, to save a text that's too 
long to fit into memory. However, the 
transfer back and forth doesn't work 
reliably. Is there a way to modify the 
recorder for use as a data-storage de- 
vice? A Model 100/microsette combi- 
nation would be the perfect answer to 
some of the more expensive units I've 



seen on the market with built-in re- 
corders. (Gordon Kane, Southfield, 
MI) 

AH The problem is that the out- 
■ put of the Model 100 is de- 
signed to plug into the AUX input of a 
cassette recorder, not the MIC input. 
The microphone input is much more 
sensitive, so the Model 100 overloads 
the recorder's circuitry, distorting the 
signal to the point that the Model 100 
can't read it when you try to reload the 
data. 

Also, you need a motor remote- 
control jack on the recorder; other- 
wise, you'll have problems reloading 
the files (the computer turns off the 
cassette player after each block of data 
so it can position and code the data). 
Unfortunately, microsettes with an 
AUX jack don't have a motor control 
jack and vice versa. 

You need to construct a patch cord 
between the computer and the micro- 
sette' s MIC input that reduces the 
Model loo's output to a level compati- 
ble with the recorder. To do so, get a 
mini-jack (input) and a mini-plug 
(output) connector. You'll also need a 
/»-watt 3.3k resistor, a .01 microfarad 
capacitor, and a 100-ohm resistor. 
Solder the 3.3k resistor and the capaci- 
tor in a series to the center pins of the 
two connectors. Next, solder the 
100-ohm resistor from the center pin 
to the outside pin of one of the con- 
nectors, then solder the outside pin 
connectors together. 

This signal attenuator should re- 
duce the AUX level of your 100 to the 
MIC level of the microsette. If the at- 
tenuator reduces the signal too much, 
lower the value of the 100-ohm resis- 
tor. 100 ohms seems to work well with 
Olympus recorders, while Sonys re- 
quire an 11-ohm resistor. If you're 
really good with electronics tools, you 
could assemble the three components 
in your Model 100's cassette DIN 
plug, but then you couldn't use that 
cord with standard-sized tape record- 
ers in their AUX jack. 



Qal'm having trouble converting 
■ programs from the Model III 
to the Model 4. I have a number of 
programs that use CMD"0" to ini- 
tiate a high-speed sort. This logic ap- 
parently doesn't exist in the Model 4. 
Is there a commercial program I can 
call from Basic on the Model 4, or a 



good sort in Basic I? (Howard 
Feldman, Three Bridges, NJ) 

AH I'm afraid you're right — Mod- 
Bel 4 Basic has no built-in sort 
routine. But there's hope. The July 
1980 issue of Tandy's TRS-80 Micro- 
computer News has a machine-lan- 
guage sort routine that works on the 
Models I, II, III, and 4, using the 
VARPTR routine. It's very fast, on 
the order of a second or so for 300 rec- 
ords. The only problem is that the sort 
is restricted to single-dimensioned ar- 
rays. The November 1981 issue of the 
same publication has an updated rou- 
tine that you can use with multi-di- 
mensioned arrays. 

You can buy back issues from your 
local Radio Shack as bound volumes 
for $4.95 for 1980 (catalog number 
26-2115) or $9.95 for 1981 (catalog 
number 26-2240). Hope this helps. 



Q|I own an LNW80-2 computer 
■ with two 5 Va -inch double-sided 
disk drives, one 5V* -inch single-sided 
flippy drive, and an 8-inch single-sided 
double-density drive. Using NEW- 
DOS80, CP/M, and my Power pro- 
gram, I can read almost any disk. But 
being able to read a disk doesn't neces- 
sarily mean I can understand it, and 
I'm stumped. 

I just inherited a Digital Research 
word processing system on 8-inch 
disks. The program is about 10 years 
old, and is on a 77-track, 36-sectors- 
per-track, 128-bytes-per-sector disk. 
This much I've figured out, but read- 
ing the disk with my Power program 
gives me nothing that's intelligible. Do 
you know of a conversion program? 
(R.W. Torell, Riviera, AZ) 

A ■First you need to know what 
■ operating system the word 
processor uses. If it's 10 years old, it 
certainly isn't CP/M, which wasn't re- 
leased until about 1976, or NEWDOS- 
80, released even later. My advice is 
that you contact Digital Research and 
ask for information about the pro- 
gram. Can anyone help? 



Qa I have a Model I with two 40- 
■ track drives. Do you know of 
any patches to convert MULTIDOS, 
DOSPLUS 3.5, and TRSDOS 2.8DD 
from 35-/40-track to 80-track sys- 
tems? I tried the Model III patches 
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GIVE YOUR COMPUTER A 

VOIC 

As well as a Mind 

vs-100 

VOICE 
SYNTHESIZER 

FOR RADIO SHACK MODELS 
I, III, 4P and Color Computer 

Introducing 

the "No Compromise" 

Voice Synthesizer at a 

price that speaks for itself! 

Price includes synthesizer, module 

power supply, 40 page manual 

editing and demo software. 



Call our "NEW" Demo Hot-Line 
W212 2960399 
And hear it for yourself! 




Text to Speech software: 

• Talker 1.4 $19 95 

• Talker 2.0 $29 95 



An Impressive List of Features: 



1 Unlimited vocabulary 
Automatic inflection. 
Proven VOTRAX technology 

We use the famous VOTRAX SC01 phoneme synthesizer 
4 programable pitch level 
Built in audio amplifier with volume control 
You can add voice to any basic program in minutes 
Super efficient: one single line in Basic will produce a full 
sentence 1 

Works with any speaker (or add S5.95 for handsome 
speaker module) 



Price breakthrough same performance as units costing 
hundreds of dollars 
I Voice editor will help you create unlimited number of words. 

sound effects, etc 
I Hundreds of applications— now cost effective in education. 

robotics, speech therapy, monitoring, games, aid to 

handicapped, security, prompting 
I Fully assembled and tested 
I Ready to plug in and talk. 
I Plugs into 50 pin I/O bus on Model 3 
I As usual our 15-day money back guarantee protects you 



Text to Speech Software for the VS-100 



TALKER 1.4 

v/ Unlimited vocabulary translation of 

English text to speech 
v/ Very easy to use: In BASIC simply type PRINT~'I talk" 
S Reads numbers up to 999 trillion 
v' Reads many abbreviations correctly 

(such as Mrs., Mr., lb., Co., etc.) 
>/ Very fast machine language program is only 4.5K long 
>/ Loads in high memory 

Only $1 9.95. Specify disk or tape 



TALKER 2.0 

v/ Same features as TALKER 1.4 plus: 
>/ Automatic keyboard echo option 
\S Automatic video display echo option 

V Punctuation pronunciation if desired 
V' And many control codes for increased versatility 
V' Self relocatable program is only 6V«K long 

V New BASIC command: PRINT! prints and talks. 

$29.95. On disk only 




Ml ALPHA ^mlhmSm 

79-04 Jamaica Ave, Woodhaven. NY 11421 +* (212) 296-5916 



Toll Free Order Line 
800-221-0916 

Orders Only. NY & Into call 

(212) 296-5916. 

Hours 9-5 Eastern Standard Time 



Add S3.00Pe' Order For Shipping 
And Handling We Accept Visa 
Mastercard, Checks. MO COD. 
Add Sales Tax Overseas. FPO 
APO: Add 10°*> Dealer Discounts 
Available COD artfl $3 00 extra 
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and they didn't seem to work. (Albert 
Landgrebe, Beltsville, MD) 

AH Because of hardware differ- 
ences between the Models I 
and III, patches to the DOSes of one 
won't work on the other. As I recall, 
MULTIDOS will format an 80-track 
disk (if you have an 80-track drive) 
and then let you use the Backup com- 
mand to move the DOS to the new 
disk. You can format an 80-track disk 
with DOSPLUS 3.5, but you can't use 
Backup to move the DOS — Backup 
reformats the disk to match the source 
disk. Contact the DOSPLUS people 
for details on exchanging disks or buy- 
ing an 80-track version. 

To the best of my knowledge, no 
one has yet developed or released 
patches for operating TRSDOS 
2.8DD on 80-track drives. If you just 
want 80-track support, you don't have 
to change the DOSes; use the CON- 
FIG or SYSGEN commands to define 
a drive as 80-track (see your manuals). 

However, 80-track disks won't do 
you much good if you have 40-track 
drives. The drives step out only as far 
as they're designed to, then stop. 



Qal'd like some help transferring 
■ Basic programs from a Model 
III (single-sided double-density disk 
drive) to a Model I (single-sided single- 
density). As you know, Model III TRS- 
DOS lets you convert a program from 
Model I format to Model III, but I 
want to go the opposite way. 

I tried using a cassette tape at the 
low baud rate, but the best I can get is 
a 50 percent success rate. The time 
spent debugging makes this unwork- 
able. I've been told that alternate op- 
erating systems such as DOSPLUS 
and NEWDOS have utilities that 
make the conversion, but I'd prefer 
not to buy a new DOS. (John MdJbon, 
Swan Marsh, Vic., Australia) 

A a What you need is Super Util- 
■ ity Plus; it'll let you transfer a 
program from any DOS format to any 
other DOS format. The only restric- 
tions are hardware (i.e., it can't copy a 
double-density disk if your hardware 
is all single-density) and CP/M, which 
has too many formats. SU + performs 
a host of other functions; it's sold by 
Powersoft Products, 1 1500 Stemmons 
Freeway, Suite 125, Dallas, TX 75229, 
214484-2976. It retails for $79.95 for 



Line 


140 


Delete one GOSOB 14 


Line 


9010 


Change !W3-W2*WY-W*i to 
iW3-W2:WY-W2: 


Line 


9011 


Change :W3"W3«W2i*W2: to 
:H3-W3*W2*W2: 


Line 


9031 


Change iIFYOWl THEN 9031 to 
:irWYOWlTHEN 9031 


Line 


904 2 


Change :WA«WA-W3/I — 1 to 
sWA-WA-W3/IiI— 1 


Line 


9050 


Change W4-.5:I-3s to 
W4-.5:W5-W4iI-3i 


Line 


9051 


Change :W4*I/(I+1) : to 
:W5-W5*I/(I+1) : 


Program Listing. Corrections to double- 


precision routines. 



the Model I, III, or 4 version, with $10 
airmail handling charge for foreign 
shipping. Make sure you order the 
Model III version. 



Q>You printed a letter from me 
■ (July 1984, p. 16) stating that I 
couldn't load Adventure Internation- 
al's Sea Dragon on a Model 4 and that 
Copycat 2.0 didn't correct the prob- 
lem for me. 

Since sending the letter, I have 
solved the problem. It wasn't that 
Copycat won't duplicate Sea Dragon; 
it definitely does. Rather, the game 
disk itself was somehow flawed. (Jim 
Basile, Cliff side Park, NJ) 

AH Thanks for the progress re- 
■port, but your Model I Sea 
Dragon isn't flawed; it wasn't de- 
signed to operate on a Model III or 
Model 4. The Model III version does 
work on the Model 4 in Model III 
mode, as I said in the July column. 



Ql Here's a list of corrections (see 
■ the Program Listing) to Jim 
King's double-precision routines, pub- 
lished in the March 1984 Feedback 
Loop (p. 16); lines 9030-9051 appear 
in the July 1984 Reader Exchange (p. 
36). (Harry Hawkins, Burton, SC) 

I 

l Thanks for the corrections. 



QpjOur chemical manufacturing 
■ operation uses a variety of Ra- 
dio Shack computers and peripherals. 
Recently, we happened to combine a 
Qume Sprint 5 daisy-wheel printer 
with a Model II and a hard disk run- 
ning under TRSDOS 4.2.6. We're get- 
ting intermittent printer interruption 



errors; the printer stops in the middle 
of a job and the computer reports 
spurious "printer out of paper" or 
"printer not on line" messages. We've 
used the same equipment in different 
configurations without problems. 

We found no problem with the 
hardware, and the people at Fort 
Worth's Operating System and Lan- 
guage Support section say they don't 
think it's software. How can we cor- 
rect the problem? (Richard Levesaue, 
Fall River, MA) 

A alt's possible that the Qume 
■ puts an unusual load on the 
printer port, which normally isn't 
used. Similarly, the hard disk could be 
putting an unusual load on the com- 
puter expansion port. With both pieces 
of equipment operating, this could cre- 
ate a conflict that could result in the 
problems you're having. 

I ran into a similar problem with a 
Datasouth printer on a Model II. It 
worked fine for several weeks, then it 
would malfunction. Switching it to 
another Model II solved the problem 
for a few weeks, then it would happen 
again. Unfortunately, there isn't a 
nice, pat solution. The cause could be 
anything from a slightly marginal 
transistor in the printer, computer, or 
hard disk to an incipient circuit board 
failure triggered by the particular 
hardware configuration. At times, 
I've felt you could blame problems 
like these on the side of the bed you 
slept on or the color of your hair. ■ 

Terry Kepner is a freelance writer 
and programmer. He's been writing 
about microcomputers since 1979. 



Frequently Needed Numbers 

Radio Shack National Parts Di- 
vision, 900 E. Northside Drive, 
Fort Worth, TX 76102, 817-870- 
5662. M/C and Visa accepted; each 
order has $1.50 handling charge. 

IJG Inc., 1953 W. 11th St., Up- 
land, CA 91786, 714-946-5805. 
Publisher of TRS-80 Disk and Oth- 
er Mysteries ($22.50), Microsoft 
Basic Decoded and Other Mysteries 
($29.95), 77k? Custom TRS-80 and 
Other Mysteries ($29.95), Machine- 
language Disk I/O and Other Mys- 
teries (Model I) ($29.95), How to 
do it on the TRS-80 ($29.95), and 
the Electric Pencil Word Processor 
($89.95). 
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Welcome to the second issue of In Touch. 
This month, let's answer some common 
questions about the VS-100 voice synthe- 
sizer. 

I How good is the voice? 

We think it's incredible for the price, but you 
can judge for yourself by calling our 24 hour 
Demo Line: (212) 296-0399. 

I What does it take to make my BASIC programs 
talk? 

With TALKER 1.4, it's simple. With TALKER 2.0, 
it's incredibly easy. If you add an asterisk after 
a"PRINT" command, the PRINT now speaks, 
(e.g. PRINT* "Hello Judy" will speak, not 
print). If you add an exclamation point 
instead of an asterisk, the PRINT command 
will print as usual, and in addition, it will 
speak! To add speech to your favorite BASIC 
program simply sprinkle a few "*" and "!" 
where you want speech. Could it be any 
easier? 

lis it compatible with my DOS? 

The software and hardware do not rely on any 
DOS feature, therefore the VS-100 system 
works with any Model I or III DOS. 

■ Do I need any cables? 

No, the VS-100 plugs directly into your TRS- 
80. It uses the expansion port on your 
computer, so it doesn't interfere with any 
printer, disk drive, or RS232 device. On the 
Model 4P, the card edge is recessed; be sure 
to order the special 50-pin extender cable 



jm\n Touch 

The Alpha Newsletter 

I Do I need an amplifier? 

No, the amplifier with volume control is built 
into the VS-100. All you need is a small 
speaker; we recommend our handsome mini- 
speaker ($5.95). 

I Which port does it use? 

All communication between the computer 
and the VS-1 00 is done using port 1 1 . 

I Can I purchase the user manual alone? 

Yes, it is available for $5 plus $1 shipping and 
handling. (The $5 is applicable towards 
purchase of the VS-100). 

I How many words can the VS-100 say? 

There are two ways to make speech synthe- 
sizers. One is to use a limited look-up dict- 
ionary. The VS-1 00, on the other hand, uses a 
much more powerful approach: the "text to 
speech" automatic translator. This means 
thatany word will be pronounced. The text to 
speech translator, with its 400 pronunciation 
rules, achieves a 96% success rate. 

I Can I get speech automatically, without doing 
any programming at all? 

Yes, Talker 2.0 has very powerful "automatic 
keyboard echo" and "screen echo" options. 
Everything that is typed and/or printed on the 
screen can also be spoken. 



We would like to thank all our 
customers for the very nice 
feedback that we receive. 
(Such as the letter at right). 
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The 
PRODUCER 



PRODUCER 

The Professional Program Writer 



YOU CAN MULTIPLY YOUR PRODUCTIVITY 

WITH THIS SENSATIONAL SOFTWARE BREAKTHROUGH 

Beginners can now program with no experience necessary. 

Professional programmers now have a tool to save days and weeks of time. 



THE PRODUCER 

WRITES CUSTOM PROGRAMS 

FOR YOU! 

Why buy expensive Data Base 
programs that are only half effective and 
require the original operating system disk 
to run the finished program? The 
Producer is a true stand-alone Program 
Generator that can create the exact 
programs you want. 

You don't need any previous 
programming experience since The 
Producer writes all the code for you And 
when the program is finished, it runs by 
itself without the support of the original 
operating system run disk. 

What Kind of Programs 
Can The Producer Write? 

With the Producer you can create 
impressive, sophisticated and functional 
software to manage your data The only 
limit is your imagination. You can quickly 
and easily create programs to manage 
such things as mail lists, personnel 
records, inventory control, library 
catalogs, loan calculations, personal 
finances, and maintenance schedules. 

You may never again need to buy a 
canned program to perform a needed task 
related to data storage and retrieval The 
Producer can write all those programs for 
you, including the capacity to do all 
standard calculations and to generate 
both on-screen and printed reports The 
freeform report generator even allows you 
to design reports on your preprinted 
forms 

How Does The Producer Work? 

The Producer itself is a sophisticated 
program based on years of research and 
development But The Producer was 
written with the end user in mind and the 
program generation process is quite 
simple. 

You can begin by using a planning form 
designed to help you organize your 
program ideas. The Producer then asks 
you a series of simple English questions to 
enable those ideas to be translated into a 
program format You use the computer's 
arrow keys and graphic characters to 
draw the data entry screen just the way 
you want it 



Then with the press of a button, the 
program generator takes over and does all 
that complex coding for you in a matter of 
minutes The result is a complete 
program, capable of running by itself 
That means your customized programs 
may be used independently of The 
Producer. (A feature not possible with 
Data Base creations.) You may duplicate 
your Producer generated programs and 
even sell them for others to use. without 
paying royalties 

How Difficult 

Is The Producer 

Process to Learn? 

The Producer software package makes 
learning simple, An easy to follow tutorial 
takes you through each step of The 
Producer process as you sit at the 
computer. (This includes audio cassette 
tapes with the Model I III versions ) This 
hands-on experience not only teaches 
you the process but allows you to create a 
program of your own design while you 
learn The tutorial is all you need to get 
started. 

Later, if you have need for more specific 
information, you can turn to the fully 
indexed Producer Reference Manual The 
200 pages of documentation cover 
virtually any question you may have so 
you will never be left guessing what to do 
next. The Producer package also includes 
a quick reference card to streamline your 
program operation and. should you ever 
need technical assistance, you may call a 
Producer Software technician for free 
counsel and trouble shooting 



Is It True That I Can 

Both Create and Edit 

At Will With The Producer? 

Yes 1 Unlike most other program 
generators. The Producer gives you 
complete freedom to design the screen 
any way you wish Experiment, rearrange 
"cut and paste between trial screens 
That's the kind of versatility you get And 
even after your program is complete, you 
can change your mind With The Producer 
you can edit and refine finished programs 
without starting over That's a real time 
saving 

What Are Some Other 

Outstanding Features 

Of The Producer? 

• Our B-Treefilestructure gives extremely 
fast access to data, allows global search 
and replace data entry by batch mode and 
automatic file rebuilding 

• The Screen Generator is the best 
anywhere at any price and gives full 
screen control including graphics You 
can add insert, ordelete. and move blocks 
of text on screen and between screens. 

• All math calculations are supported 
including subtotals and global 
recalculations 

• The Freeform Report Generator gives 
you an amazing versatility to design text 
placement, interfield calculations, and 
formats You can even print reports on 
your standard forms 

• The Producer , ai kagi il <o includes a 
free Home Inventory program and a one 
year subscription to The Producer 
Newslettei 



The Producer 

$199.95 

Available now for TRS-80 

Models I, III, IV 

Ask about DATA SHUFFLER. 
New Sort/Merge Program $34.95 

^ 76 Order toll free: 

1-800-433-5355 
Texas 817 274-6998 
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That Extra Something: 
CP/M for the Model 100 



Hot Items 



edited by Bradford N. Dixon 



Behind the scenes at this 

year's National Computer 
Conference in Las Vegas, 
representatives of PIC 
Inc. showed a Model 100 
running CP/M with 64K 
of RAM and a battery 
powered 360K disk drive. 
The add-on memory mod- 
ule, developed by the Ir- 
vine, CA-based firm, 
should be available in late 
fall, according to a com- 
pany spokesman. 

The battery-powered 
add-on system PIC was 
showing incorporated 32K 
of high-speed 8K by 8-bit 
CMOS RAM on a sepa- 
rate card. The expan- 
sion RAM card resides within a 314- 
inch Dysan-formatted Tabor disk 
drive. 

"Although there are questions as to 
whether or not the 360K, 3 14 -inch 
disk format will catch on," PIC's 
president Ken Harlin said, "we were 
attracted to Dysan's concept of mar- 
keting [its drives]." Harlin also noted 
that PIC could make its system avail- 
able on other disk formats (514- or 
3 Vi -inch) if Dysan's smaller drives 
weren't acceptable to consumers. 

At show time, PIC was still negoti- 
ating with Digital Research Inc. to li- 
cense CP/M 2.2 for the Model 100. 
PIC's add-on expansion unit will run 
CP/M with a minimum 48K RAM 
(16K on board the Model 100 and 32K 
on the expansion unit). But Harlin 
told 80 Micro that nothing was firm. 

Prices for the add-on, CP/M, or 
combinations of the drive with CP/M 
weren't established at the time of the 
show, according to Harlin. One factor 
is an expected price reduction for 
CMOS RAM chips (from $ 17-522 
each in quantity). 




crosoft Word, ready early 
in 1985. Their Multiplan 
spreadsheet may be out in 
a Windows-based version 
in time for Comdex in No- 
vember. 

And Tandy isn't the on- 
ly computer manufactur- 
er expected to support Mi- 
crosoft's program. Digital 
Equipment, Texas Instru- 
ments, AT & T, Wang, Ze- 
nith, and Hewlett-Packard 
have all voiced their inten- 
tions to make Microsoft 
Windows available for their 
micros. 



Tandyland 



Photo 1. Microsoft's MS- Windows for the Model 2000. 

Will Microsoft Windows make Tan- 
dy's Model 2000 more attractive to 
software developers? The jury's still 
out. 

As an extension of the MS-DOS op- 
erating system on the 2000, Windows 
provides a "universal operating envi- 
ronment for the development of rich, 
graphics-based applications pro- 
grams" according to the people at Mi- 
crosoft (see Photo 1). 

Supposedly, Windows' appeal is 
founded on more than the 2000's col- 
or and high-resolution capabilities. 
Mouse-based programs developed us- 
ing Windows will run on any comput- 
er that provides the Windows envi- 
ronment. 

Software companies such as Multi- 
mate International, Peachtree Soft- 
ware, and Microrim are considering 
products that use MS-Windows. 
However, none of these manufactur- 
ers has definite plans or a timetable for 
possible release of a Windows-based 
product. 

Microsoft is aiming to have Win- 
dows-based word processing, via Mi- 



If you've noticed Tandy's 

newspaper ads for the 
Model 2000 lately, you al- 
so might have noticed a new logo iden- 
tifying the 2000 as a member of Tan- 
dy's Advanced Technology Series. 

In July, Tandy began using the spe- 
cial logo to designate an elite group of 
products that "utilize the very latest 
leading-edge technology," according 
to Tandy's chairman John V. Roach. 
Roach underlined the special charac- 
ter of these products saying, "Less 
than one percent of our products will 
be awarded this distinction initially." 

Radio Shack's Model 100 joined the 
Tandy 2000 in gaining the Advanced 
Technology distinction as did a new 
digital audio disk and a 16-channel 
portable programmable scanner. As 
other state-of-the-art products appear 
in Radio Shack stores, those that meet 
the Advanced Technology Series stan- 
dards will be awarded the emblem. 



Update 



Quality Education Data, a Denver re- 
search firm that studies micros in edu- 
cation, recently released some specific 
information about the most popular 
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micros used in education. The num- 
bers jibe with percentages reported in 
the September 1984 Pulse Train (p. 
21), but QED's latest report provides 
some hard numbers. 

The list of the country's 59 largest 
school districts using microcomputers 
shows that Apple computers remain 
the most popular, with 16,992 units, 
while Radio Shack comes in second 
with 10,448 installed computers. The 
Table lists the top 10 districts using 
Radio Shack computers. 

The lap-size portable computer mar- 
ket narrowed even further last July 
when Convergent Technologies an- 
nounced suspended production of its 
Workslate portable computer. 

It appears the end is near for Work- 
slate, one of the Model 100's first 
competitors. Although the company 
will still sell the computer from inven- 
tory, marketing is minimal and the 
company has moved most of the 
Workslate employees to other jobs. 

How do you spell "lawsuit"? Cornu- 
copia Software Inc. of Berkeley, CA, 
which sells the Electric Webster spell- 
ing-checker program, knows better 
than most. This past spring Merriam- 
Webster Inc. slapped Cornucopia with 
a lawsuit aimed at blocking the sale of 
Electric Webster. 

Merriam- Webster, based in Spring- 
field, MA, alleged that Electric Web- 
ster's packaging imitated the "trade 
dress" of Merriam's best-selling Web- 
ster's Ninth New Collegiate Dictio- 
nary. Merriam also claimed that 
Cornucopia infringed on their bulls- 
eye trademark, including the Webster 
name. 

In addition to an injunction, Mer- 
riam sought triple damages from Cor- 
nucopia, an accounting of the defend- 
ant's profits, and $500,000 in punitive 
damages. 

Last July, Cornucopia's Philip 
Mantsfield said that the matter was 
settled out of court for an unspecified 
amount of money. In addition to pay- 
ing the settlement, Cornucopia agreed 
to state in Electric Webster advertise- 
ments that the program and Cornuco- 
pia weren't associated with the Mer- 
riam- Webster dictionaries. 

Face to Face 

Over the course of the summer there 

was lots of movement between offices 





Radio Shack 


School District 


Computers 


Duval County, FL 


1662 


New York, NY 


1331 


Dallas Independent S.D., 


TX 1200 


Los Angeles Unified S.D. 


CA 740 


Chicago P.S.D., IL 


729 


Polk County S.D., FL 


572 


San Antonio S.D., TX 


500 


Orange County S.D., FL 


425 


Palm Beach County S.D. 


FL 360 


Houston Independent S.D., TX 280 


Table. Top 10 school districts using Radio 


Shack computers. 





at the Tandy Towers in Ft. Worth. Bill 
Walters left his position as the product 
line manager for Radio Shack's lap- 
size Model 100 and was replaced by 
Stewart Weinstock. Weinstock was 
with Tandy in Philadelphia before 
taking the Model 100 position. He 
moved up through the ranks, holding 
positions as Radio Shack store manag- 
er, computer marketing representa- 
tive, and senior marketing representa- 
tive. Although Weinstock doesn't 
have a technical background, his mar- 
keting experience should help him an- 
ticipate computer buyers' needs. 

When Ed Juge was promoted to di- 
rector of market planning from direc- 
tor of merchandising for Radio 
Shack's business computer products, 
the door was open for Van Chandler 
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Photo 2. Bernard Appel, new president of Tan- 
dy 's Radio Shack Division. 



to move into Juge's old job. Chandler 
was Radio Shack's first software ex- 
pert and handled software develop- 
ment for the Model I. His most recent 
title was Radio Shack's director of ap- 
plications software. 

All the activity culminated with the 
appointment of Bernard Appel as 
president of the Radio Shack Division 
of Tandy Corporation (see Photo 2). 
Appel started with Tandy as a buyer, 
and has served as a merchandise man- 
ager as well as in various positions as 
vice president. Most recently, he was 
Radio Shack's executive VP of mar- 
keting. 

MicroTrends 

The feds are taking steps to bring the 

criminal code into the computer age. 
Recently the U.S. House of Repre- 
sentatives approved the first federal 
criminal law against unauthorized 
computer access. The bill makes it a 
felony to obtain classified computer- 
ized information without authoriza- 
tion. The proposed law also makes it a 
felony to receive more than $5,000 in 
profit in one year as a result of a com- 
puter break-in. 

The maximum penalty for first of- 
fenders would be 10 years in prison 
and a $10,000 fine, or twice the value 
of the offender's illegal gain, which- 
ever is greater. Twenty years in prison 
and $100,000 or twice the illegal gain, 
whichever is greater, is the proposed 
penalty for repeat offenders. 

Under the bill, computer tampering 
is a misdemeanor punishable by a 
$5,000 fine or one year in prison. 
Computers holding financial and 
credit data are also covered under the 
bill's umbrella when that data may be 
accessed only by a government com- 
puter. 

In light of the recent hoopla involv- 
ing illegal entry to a variety of govern- 
ment and private computer systems, it 
seems Uncle Sam is serious about 
cracking down on computer-related 
crime. 

It was probably inevitable in 1984: 

Business managers are using personal 
computers to handle personnel prob- 
lems. 

According to an article in the July 
25, 1984, Wall Street Journal, manag- 
ers are turning to floppy "doctors" 
for everything from a solution to pro- 
duction slumps to entire personnel 



22 • 80 Micro, November 1984 



TRS-80 MODEL 4 

Word Processing Program 




D 80x24 DISPLAY using TRSDOS 6 or any MODEL III DOS. 
D Built-in FORM LETTER and MAIL-MERGE capabilities. 

□ Built-in HYPHENATION capabilities. 

□ 55 separately programmable MACRO FUNCTION KEYS. 

□ Performs PROPORTIONAL-SPACE right-margin justification 
on over 80 different printers (all drivers included FREE) 

O Integrates with ELECTRIC WEBSTER spelling checker. 

□ Keyboard entry and printing of 31 European Characters and 
special symbols 

D LeScript also available to run on TRS-80 MODEL I. MODEL III, 
LNW-80. LNW-TEAM (80x24). Holmes VID-80 (80x24). and 
Lobo MAX 80 (80x24). 

D CP/M and TRS-80 MODEL II versions now available 
(only $199.95). 

□ TANDY 2000 and IBM-PC versions available after October 
1984 ($199.95) 



CALL 1 -305-259-9397 



ANITEK SOFTWARE PRODUCTS 
PO BOX 361136 MELBOURNE. FL 32936 



FREE SHIPPING WITHIN THE U.S.; OUTSIDE THE U S ADD $10.00 FOR SHIPPING, 
FLORIDA RESIDENTS ADD 5% SALES TAX ALL ORDERS PREPAID BY CHECK. 



MONEY ORDER. CREDIT CARD OR C O D 
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TRIAL-SIZE DISK OFFER 

Fill out and return this coupon to receive a free trial-size copy 
of the LeScript word processing system - a $25.00 value 



Name 


Address 


City State Zip 


Telephone 

My system is: 
u Model I III 
C Model 4 
□ MAX-80 
LNW-TEAM 

Send to ANITEK • PO 


D Holmes VID-80 

□ Model H 

D CP/M Model 4 

CP/M MAX-80 

Box 361136 • 


D CP/M LNW-TEAM 
n CP/M VID-80 
a TANDY 2000 
n IBM PC 

Melbourne. FL 32936 
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training programs. Software ranges 
from simple computerized manage- 
ment training programs to more so- 
phisticated programs that actually 
provide advice based on an employ- 
ee's psychological profile. 

Although programs from compa- 
nies such as Human Edge Software 
Corp. of Palo Alto and Interactive 
Health Systems Corp. of Los Angeles 
have found some support in the busi- 
ness arena, there are also skeptics. 
Derwin Fox, vice president of Xerox 
Learning Systems, was quoted in the 
article as saying, "I don't think you 
can substitute interaction with a com- 
puter screen for interaction with an- 
other person in learning to deal with 
people." 

Nonetheless, a study conducted by 
Wilson Learning Corp. indicates that 
in the next five years, half the money 
spent on management training in U.S. 
business will go toward computer self- 
instruction courses. The trend indi- 
cates a 45 percent increase over the 
current $1 billion spent annually in 
management training. 

Strangely enough, the office isn't 
the only place where people use these 
programs. When one Human Edge 
customer introduced the software 
product called Management Edge to 
his wife, she immediately adapted it 
for handling their "stubborn" three- 
year-old son. The article went on to in- 
dicate that the woman's friends were 
interested in using the program to get 
advice on handling their husbands. 

In the future, perhaps police depart- 
ments will use similar programs to 
handle domestic disputes. School 
counselors could tap the power of mi- 
cros to combat student problems. Ah, 
Big Brother, the possibilities seem 
endless. If only micros could be built 
with warm handshakes and sympa- 
thetic CRTs. .. . 

A Newsweek market research report 

found microcomputers gaining sup- 
port in businesses that have more than 
5,000 employees. 

Among micros available to business 
professionals, IBM PCs were pre- 
ferred, followed by micros in the Ap- 
ple II family, Wang's Professional, 
Radio Shack TRS-80s, and Digital 
Equipment's DECMate and DEC 
Rainbow. The report didn't specify 
which model in the TRS-80 line was 
most popular. 



The businesses surveyed used mi- 
cros primarily for word processing, 
accounting, financial analysis and 
planning, data-base management, da- 
ta input and analysis, education and 
training, and communications. Use of 
micros for electronic mail and graphic 
design and production was expected to 
grow, but in most of the companies, 
in-house networking was barely un- 
derway. 

Not all the competition during last 

summer's Olympic games involved 
athletes. Lotus Development Corp. of 
Cambridge, MA, and Ashton-Tate 
Inc. of Culver City, CA, waged their 
own contest in the commercials be- 
tween ABC's television coverage of 
the games. 

The commercials featured Lotus' 
integrated software program Sympho- 
ny, and AshtonTate's Framework. 
Both companies feel the time is right 
for mass media advertising and both 
have the bucks to do it. The spots, at 
$260,000 for each 30-second airing, 
are testimony to both companies' be- 
lief that the software battle will be won 
in marketing, not product features. 

Last summer, Searchmart Corp. of 

North Palm Beach, FL, introduced a 
free call-in software-products data 
base called (uniquely enough) Soft- 
ware Library, which they feel is revo- 
lutionary. 

"There are several software data 
bases," states Victor Gruneau, presi- 
dent of Searchmart, "but they charge 
substantial fees for making searches 
and they are not available on-line to 
software shoppers who want to search 
the files at their convenience on home 
or office computers." Callers can get 
descriptions, prices, and other details 
about thousands of software pack- 
ages. 

Most of the information of interest 
to TRS-80 owners concerns business 
applications software. A search for ac- 
counting programs using CP/M for 
TRS-80s turned up descriptions of 
over 25 packages in a wide range of 
prices. However, the data base had no 
listings describing games available in 
Radio Shack's TRSDOS format. 

The phone number for the Software 
Library's computer is 305-845-6466 
and you should set UART parameters 
for 8-bit words, 1 stop bit, and no par- 
ity. The host computer responds nicely 



to 300 baud transmission and may 
also support 1,200 baud. 

Now that Radio Shack Computer and 

Telephone Centers are sharing retail 
space, the possibility arises that the 
two technologies might merge as well. 
It seems only natural. 

Although hardware that joins tele- 
phones and computers has been 
around since 1981, the introduction of 
Zaisan Inc.'s IBM PC-compatible 
ES.3 computer-phone in August drew 
new attention to the concept. Articles 
describing the Houston firm's $2,595 
hybrid appeared in PC Week and 
Business Week. 

Even with Radio Shack's new em- 
phasis on the telephone, there's been 
no hint that the firm might get its com- 
puters and its phones together. In light 
of the telecommunications boom, 
however, it might be something for the 
folks in Fort Worth to think about. 

A recently published study looks at 

computer education in New York 
City's public schools, with special at- 
tention to the economically disadvan- 
taged minority student. The Commu- 
nity Service Society of New York 
(CSS) commissioned the study, titled 
Computers in the Schools: The New 
Frontier. To make sure that poorer 
kids aren't left out of the computer 
revolution, the report calls for close 
monitoring of money spent on com- 
puter education. 

The study looks at how computers 
affect poor children's ability to learn 
and to find good jobs after gradu- 
ation. It also considers what schools 
can do to help families that can't af- 
ford a home computer. For a copy of 
the report, write to Adrienne Hiddel- 
son, Community Service Society of 
New York, 105 E. 22nd St., New 
York, NY 10010. 

How much time and money does it 

take to run a public-access bulletin 
board system? That's what Plumb, 
the BBS newsletter, asked sysops in a 
recent survey. As it turns out, sysops 
spend 50 hours a month maintaining 
their message and data bases and 
modifying their boards. Start-up costs 
average more than $3,000, and it takes 
$50 a month to maintain the system. 
Monthly expenses include costs for 
electricity, telephone service, equip- 
ment, supplies, and legal advice. ■ 
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tar SEC 

% SANYO 

OKIDATA EPSON Datalife TAVAPC kayproh BASF 

We Make Computerizing 

h PAMtSS PRBCiSS! 




RX80 

$ 289 

• 100 cps ^W 

• Tractor paper feed 

• 128 Typestyles 

• 7 graphic modes 

• Proportional space 

• TO*' carriage 



EPSON 

FX100 

$699 

• 160 cps 

• Tractor paper feed 

• 128 Typestyles 

• 7 graphic modes 

• Proportional space 

• 15" carrriage 



The MBC 555 

Personal 
Computer 

$1199 




FX80 - 160 cps. 10 carriage 
printer S519 



EPSON LQ1500 




M279 



includes parallel interlace. 200 
CPS. bi-directional, sheet 
feeders available. 



MAILMERGE 
CALSTAR 
INFOSTAR 
WORDSTAR 



Sugg Retail Price 



$?50 
$495 
S495 



Sugg Retail Price 
SANYO MBC 550 S995 

SECOND DRIVE $400 

SANYO MONITOR SI 50 

MSDOS ... $60 

SPELLSTAR S2S0 

Features include 8088 Microprocessor. 128K RAM expan 
dable to 256 RAM parallel printer port graphics capabili- 
ty, game paddle port 8087 math co-processor port Also 
available with double-sided disk drives — SJJ59 00 




<©TAVA PC 



THE MOST IBM COMPATBU 
COMPUTE* YOU CAN BUY' 
The TAVA PC includes a system 
unit with 12BK RAM drive 
adapter 2 360K Hooplas, color 
graphic s adapter and monitor 



i* Jflfc $1695. 




OKIDATA 



The moat advanced 
dot matrix printer 
in its price range 



S439 





you can III 
it in your 

briefcase 



RITEIWI 

PERSONAL 
PRINTER 

The first 10" g QOO 
printer 9 0£9 

Ii _ 

amm 

«... iikfilf 

T7w price pwfofmanceQOQQ 

STAR GEMINI 15 S449 

STAR DEITA 10 $479 

OKIDATA 82 S349 

OKIDATA 93 S699 
OK/DAM 84 ... $895 

NEC 8023 $399 

NFC ?030 . $899 

NEC 3530 $'599 

BROTHER HR 15 $459 

BROTHER HR 25 $699 

BROTHER HR 35 $959 

PANSONIC 1090 $299 

PANSONIC 1091 S349 



WERE GIVING 

MAIL ORDER 

A GOOD NAME! 




IF ANYTHING 

BEATS OUR 

SELECTION 

IT'S OUR PRICES! 


^•^-^J-^^^^; 22295 Euclid Ave. 

DATASWPU€S Euc,id ' 0hi0 44 " 7 

A SUBSIDIARY OF THE COMPUTER WAREHOUSE. INC. OF OHIO 




$219 



DISKIT HI 

MODEL III & IV DISK UPGRADE 

NOW ADD UP TO 4 

INTERNAL DISK DRIVES TO A 

RADIO SHACK MODEL 3 & 

MODEL 4. UP TO 1.3 

MEGABYTES OF DISK 

STORAGE! 

• Gold Plaled Edge Connectors • Metal 
Disk Drive Brackets • All Hardware and 
Cables • Switching Power Supply • 1 hour 
or less tor installation • Supports t" or 8" 
Drives • 40 80 Track supported • Single 
Dual Head supported • 100*t compatible 

• No Soldering needed • f 80 days warr- 

ranty on Controller 

OISKIJ III » o Drtva* 
DISKIT III 

w/ona Taac 55* 40 Track Drtva 
DISKIT III 

55* 40 Track Drive 



S2T9 00 



SJ8S 00 



tv/fwo Tt 
DrSKIT III 

w/two Ti 
DiSKIT III 

wfoui Ti 



S'.s-, )C 



558 40/40 Dual Drtra 1659 00 



558 40/40 Dual Drtva 1995 00 



TOLL FREE 1-800-321-3552 

IN OHIO & OTHER INQUIRIES 216-481-4993 




TRS-80 Mod. I Expansion 

5349.00 

• RS2332C serial I/O 

• Parallel printer port 

• Gold-plated connectors 

• Floppy disk controller 

• Full 32k 200ns RAM 

• Real time clock 

• 6 month warranty 

• Heavy steel case 

• Thousands of users 

• Works with any DOS 100% 



Starling at 



BARE 

DISK DRIVES 

The extremely reliable Teac 
slim-line now requires half the 
power plus includes our 
exclusive 6-month double ex- 
tended MFR warranty. (Was 3 
months). 



TEAC 5'-«' 554 40 TRK $169 

TEAC 5'-« " 55B 40/40 TRK $219 

Tandon TNI100-1 40 TRK $769 

Tandon TM100 2 40/40 TRK $239 
Tandon TM 100-4 80/80 $319 



PRINTER BUFFERS 

FOR MOST COMPUTERS 

QUADRAM MICROFAZER 

Parallel to Parallel w/8K J 149 00 

Parallel to Serial w/8K $179 00 

Serial to Serial w/8K $ 1 79 00 

Serial to Parallel w/8K J 79 00 

Each Adds 8K Upgrade $ 10 00 

All coma with pause control and copy feature 
and can be upgrades to 5 1 2K 

SPRINTER 
Double Your Speed 

Speed-up cuts computer operation time in 
halt, saves time and money. Fast 4 MHz Z80B 
CPU included, installs in 15 minutes with no 
soldering or cutting. 

SPRINTER III for MOD III $89 95 

SPRINTER I for MOD I S89 95 



MODEL I 
Double Density Package 

Evan/thing you naad to convert your TRS 80 Modal 
I to rvn doubla density Complete «vfff> software. 
hardware and instructions Installs in minutes with 
no soldering wiring or cuttmg 
Dosplus V 3 4 wfLNDOUBLER V8 $t94 00 

LNDOUBLER 5'8 Board wlo dos SI 59 00 



MODEL III & IV 
RS-232 Communication 

Direct replacement tor RS 2332. fully tested 
and burned in, easy in i 'filiation. 120 day 
warranty. 

RS-232 $78.95 



MODEL IV — 64K 

MEMORY EXPANSION 

Guaranteed 1 full year 

Set of 8 

4164 RAM CHIPS $69.95 

w/PAL CHIP to go from 

64 to 128K $84.95 



16 K RAM SPECIAL 
MEMORY UPGRADE 

4116. 200ns. Guaranteed one full year. 
$17.95 

NOW ONLY $11.95 
with the purchase of $25 or 
more! (while supply lasts) 




BASF 



SUPER 
SALE! 



As Low As SI 39 — Buy in Bulk and Save' 
5 '4 Soft Sectors Bulk 

S'nqle side sing/e density *ith hub ting W0"* certified I y 
arrant* 5; j 19 • 

5 '4 Solt Sectors Bulk 

Smqle side double density with hub nng 100° ■ certified t yr 

iv.it'.vitt s ' TV 



rrri'hm UmiuI 



'.YTi 



Euclid, Ohio 44117 
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ROLLTOP 100 
Disk File Model mnoo 

Twice the capacity (100 - 5'/«" 
Disks) of the leading "flip top" 
file. But it takes no more desk 
space! An outstanding design 
that combines contemporary 
styling with the elegance of a 
rolltop enclosure and a textured 
buff plastic body. It includes 10 
diskette dividers and anti-skid 

fee $36.00 

Locking Model *RT100L$46.00 



DOTWRITER 3.0 
Lata you create words and drawings 
quickly and easily, right on the 
screen of your TRS-80. 
■DOTWRITER' uses high resolution 
"dot graphics'' to create fancy 
lettersets 



DOTWRITER 



$69 95 



DATAGRAPH 

Transforms your VISI-CALC™ tiles in- 
to high-resolution custom graphs on 
your TRS-80 "computer and 
graphics printer. Super 3rd genera- 
tion printer graphics program 

DATAGRAPH $74.95 



ULTRA TERM 
Version 2 

Supports borth manual and auto dial 
modems. Exclusive Ultra Term direct 
disk file transfer mode, allows unat- 
tended operation at the receiving 
computer. Line printer support with 
a IK print buffer Halt A full duplex 
support. Universal ASCII format tile 
transfer with a 33K buffer and a full 
featured host program $49 95 



VERSABUSINESS SERIES 

The Most Powerful Business 
Software Ever! 
Model I, III & IV 
Each Versabusiness module can be 
purchased and used independent- 
ly or can be linked in any combina- 
tion to form a complete, coor- 
dinated business system. 

VERSARECEIVABLES $84 95 

4 complete menu-driven accounts 
receivalbe. invoicing and monthly state- 
ment generating system Keeps track of 
all information relating to who owes you 
or your company money and can provide 
automatic billing tor past due accounts. 

VERSAPAYABLES $84 95 

Designed to keep track of current and 
aged payables, keeping you in touch 
with all the information regarding how 
much money your company owes and to 
whom. 

VERSAPAYROLL $84 95 

Powerful and sophisticated yet easy to 
use! Complete employee records are 
maintained and all necessarry payroll 
calculations are peformed automatically 

VERSAlNVENTORY $84 95 

Just what you need to maintain complete 
control of your Inventory system. Gives 
you Instant access to data on any item 
Keeps track of all information related to 
what Items are in stock, etc. 

VERSALEDGER II $ 129 .95 

This complete accounting system grows 
with your business. Can function as a 
simple personal checkbook register, a 
small business bookkeeping system or a 
large corporate genreal ledger system! 



ELECTRIC WEBSTER 

w/correcting feature $119 00 

Hyphenation feature $ 39 00 

Grammatical feature $ 39 00 

COMPLETE SYSTEM 

All tour programs Si 89 00 

Cadillac" of Spelling Checkers 
80 Micro 9/82. 
Available on Model I. Ill 8, IV 



ELECTRIC PENCIL 
Version II 

Disk Version $79.95 

Tape Version 569.95 



4&& 



r 



$! 04.95 



Model I. Model III, & IV 
LNW-80. PMC-BO and 
MAX-80. 



7.1 ....$99.95 

With Labels $7 74.95 
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DATALIFE Premium Diskettes at Affordable Prices 
5'« MD52S-01 IS/D Den (box of 10) S23.95." 

Special Savings! 
Soft-Sectored Diskettes 
5'4 2S/D Den (MD550-01) $34.90 

5' 4 2S/4 Den (MD557 01) S49.90 

S43 95 
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To Our Friends, 

Thank you for making MICRO DA TA SUPPLIES one of the fastest growing computer dealers 
in the U.S. We pledge to continue offering the most complete selection of computers, 
peripherals, software and supplies at discount prices - to help you save more . . and to serve 
you better. &4>4s&u>J&- 

Russ Knots • President 
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THE HOME ACCOUNTANT 

The #f best sailing program tor 
home and small business accoun- 
ting Is now available for TRS-80 
Model 3. handles up to 99 accounts, 
five checkbooks, multiple Income 
accounts, and can split transactions 
to any number of accounts. Prints 
net worth statements, Income 
statements, as well as custom 
designed reports. Displays a bar 
chart and trend for any selected 
category. Its easy to use and yet 
provides all the power you'll need 
(by Continental Software, requires 
Model 3, 2 ddves: 48K) . $62.95 



NEWDOS/80 
Version II 

MOD I or III $119.95 



Let your TRS-80™ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 

Dl$k Drive & Memory Diagnostic Program 

by David Stambaugh 

For MODEL I $24. oo 

For MODEL III $26 00 

LDOS/5.1 S709.95 



THE WAIT IS OVER 

CP/M 

Exclusively for the 

Model 4 

Now. tor the first time, you cen unleash 
the powerful features resident in your 
MODEL 4 computer. Open up the vast 
store of CP/M software such as Wordstar. 
dBase II and Multlplan. along with 
thousands of others! 

• Includes INTERCHANGE a utility that allow* 
reeding, writing and copying 20 ditlerent 
manufacturer s disk lormatt such as IBM. 
KAYPRO. OSBORNE. XEROX, etc. 

• Complete with tha following CP'M utilities 
ASM. DOT. DUMP ED. LOAD. PIP STAT and 
SYSGEN 

• NO copy protection Backupt may ba mada 
lor your own uta and protection 

• The CONFIGURATION program supports a Ml 
range of S'« dish drives: 335. 40. 77 and BO 
(rack!, single and dual aided In any combina- 
tion as well an tha standard Model 4 drive* 

• includes MODEM 7. • powerful public domeln 
communication* program tor tile tranter and 
remote data bate acceat 

• Support* 80 i 24 video, reverse video, direct 
cursor addressing and more 

• Utilizes the Model 4 function keys and allows 
user defined keys 

• Auto execute command tor turnkey 
applications 

• FORMAT utility permits up to 52 disk formats 
to be constructed, all menu drive. 



5189. 95 



POWER DIRECTORS 

Choosing a Line conditioner for 
your computer is pure logic! 

Model P22 $74.95 

Model P2 $99.95 

Model P12 CALL 

Call or write for free brochure! 



BOOKS 

OTHER MYSTERIES 

TRS-80 DISK $19.95 

Microsoft Basic Decoded $24.95 

The Custom TRS-80 $24 95 

Basic Faster A Better $25 95 

How To Do It On The TRS-80 $24 95 

TRSDOS 2 3 Decoded $24 95 

Tb§ Custom Apple $24 95 

Machine Language Disk I/O $25 95 

CP/M Printer $15.95 



MISC. 
Avery Tabu tables 

5000 IH x 15/16' 115 95 

S- rile Box tor 75 Diskettes JJ9 95 

LABLEMAKER Kit w/400 7 up labels S29 95 
Casslabel Kit w 200 Casette Labels and 
200 1 up Labels 134 95 
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WE ACCEPT 

• Visa 

• Maatarcard 

• Check* 

• Monay Orders 5; 

• COD. 



KINNIIIIIIIIHIIIIIIIIIIIIIimilllE 

i 
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MOST SCHOOL. 

GOVT AND 

FORTUNE 1000 CO 

P OS ACCEPTED 

Add 3H Sarv Chg 

Mir- o'der $50 



1 I 
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I 



ADD S3 00 FOR 

SHIPPING 

& HANDLING 

$6 00 Extra for 

CO D Order* 

Ohio Residents 

Add OH Sale* Tax 



lllllllllllUIMMMHIIrMrtm 



in 



'* 1S/DD/SS ■ Box of 10 S23.95 

4 2S/DD/SS ■ Box of 10 S33.95 

Purchase 10 boxes of disks and you 
pay only S2 1. 95 per box 
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READER EXCHANGE 



Creator Update 

After making the software buy of 
the year, Bruce Tonkin's Creator II 
(February 1984, p. 68), I found that 
this data base generator wasn't com- 
patible with NEWDOS80. The rea- 
son: The lines of Basic code written to 
a sequential file aren't in numerical se- 
quence. TRSDOS resequences the 
lines as they're read into memory; 
NEWDOS80 doesn't. The solution is 
the NEWDOS80 Do command. If the 
program is a do-file you can easily 
convert it to a Basic file and save it 
without ever leaving the DOS (see the 
Program Listing). 

Dennis Hedrick 

13588 Becraft 

Chino, CA 91710 

Tonkin Responds 

/ congratulate Mr. Hedrick on his 
enhancements: They eliminate the need 
to sort program tines, and make it 
easier and faster to write and run pro- 
grams with The Creator under NEW- 
DOS80. Knowledgeable users make 
programming a rewarding career. 

The suggested changes do cause a 
few problems, however. First, you're 
creating two copies of the generated 
program on disk, leaving less room to 
save the resulting Basic program. 
Also, when you execute a do-file, The 
Creator doesn't check whether it's 
overwriting a program or file. Anoth- 
er minor concern: You have to exit Ba- 
sk to run the generated program. 

To keep my costs and price low, I'll 
continue to send out the unaltered ver- 
sion. I hope these modifications will 
encourage even more readers to get a 
copy of The Creator from a friend, lo- 
cal user's group, bulletin board, or if 
all else fails, from me. I still forbid 
sales of the program without my writ- 
ten permission. 

Bruce W. Tonkin 
34069 HamesviUe Road 
Round Lake, IL 60073 




Fine Printing 

I'd like to respond to John Solie's 
questions about the C.Itoh 8510A 
Prowriter parallel printer (July 1984, 
p. 34). To print double-width (elon- 
gated) characters, use CHR$(14). To 
turn off the double-width character 
feature, use CHR$(15). 

Bit-image graphics aren't easy to 
print. You have to lay out your figure 
in terms of columns and dots, and 
determine the code number corre- 
sponding to the pattern of dots and 
spaces in each column. Moreover, to 
make figures connect from line to line, 
you must set the line spacing to 1/10 
of an inch (CHR$(27);CHR$(84); 
"16"). 

John's last question related to the 
dual in-line package (DIP) switches. 
I'll discuss only switch sets SW1 and 
SW2, which are directly under the rib- 
bon cartridge when it's at its rightmost 
position. It's important to note that 
the switches are numbered 1-8 from 
left to right in the manual, but from 
right to left on the printer. In both sets 
of switches, the open position is 
toward you. Using O for open and X 
for closed, here are the switch settings 
turned around to match their position 
on the printer: 

SWl: XXXOOOXO 
SW2: OXOOOOXX 



Closing SW2-6 lets you use the 
graphics mode by typing in CHR$ 
(27);CHR$(35); it's easier than bit- 
image graphics, providing you can as- 
semble the blocks into the figure you 
want. 

Roger G. Christman 

1890 Abington Road 

Bethlehem, PA 18018 

Returns to Sender 

I've noticed some confusion about 
uploading files with the Model 100's 
Telcom program. The article "Up- 
loading Text to WordStar" (August 
1983, p. 210), among others, cites in- 
sertion of carriage returns as a disad- 
vantage of Telcom. What I can't un- 
derstand is why. 

You don't need anything fancy to 
solve the problem. When you're up- 
loading a file, Telcom prompts you 
for the line width. All you have to do is 
press the enter key without typing in a 
number and Telcom sends the file 
without the extra carriage returns. 

Stephen Fournier 

15122 Pheasant Drive 

Surrey, B.C. V3R 4X6 

Canada 

Utility Line 

Super Utility Plus users should be 
aware that when you format a data 
disk with the Format utility, you can't 
back up that disk using TRSDOS 1.3's 
Backup utility. However, you can eas- 
ily back up data disks prepared with 
the TRSDOS 1.3 Format utility. The 
reason for the difference apparently is 
that TRSDOS 1.3 lays down copy- 
righted code on track 1 while Super 
Utility Plus doesn't. 

Carl Bernofsky 

6744 Milne Blvd. 

New Orleans, LA 70124 

In Search Of. . . 

I'm putting together a collection of 
word game programs that I intend to 
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Program Listing. Changes to The Creator II and The Reportorfor NEW DOS users. 

Changes to The Creator II 

270 JN$=PNS+"/JCL":KFS-PN$+"/KEY"+":'+AN$:DF$=PN$+"/DAT"+": 
"+ANS:PN$-PN$+"/BAS":OPEN"0",l,JN$+":"+BN$:PRINT #1, "BASIC, 3V": PRINT 
#1,"1 REM*PROGRAM NAME: " iPN$; "*": PRINT #1,"2 REM* DATA FILE NAME IS 
■;DF$;"*": PRINT II, "3 REM*DATA FILE IS ON DRIVE ";AN$;"*" 

1900 PRINT #1, "SAVE ";CHR$( 34) ;PN$; " : " >BN$;CHR$(34) :CLOSE 

1910 CLS:PRINT"Your program has been written and saved on the specified 
drive, as ";JN$: PRINT "Ypu must now exit to NEWDOS80 and type 
DO";JN$:PRINT PN$;" will be saved and ready to run" 

Changes to The Reportor 

390 JN$-PN$+"/JCL"+":"+DR$:PN$»PN$+"/BAS"+":"+DR$ 

430 OPEN"0",1,JN$:Q$«CHR$(34) tPRINT *1 , "BASIC, 3V" 

2636 CLS: PRINT: PRINT "Your program has been written as "; JN$:PRINT "You 
must now exit to NEWDOS80 and type DO ";JN$: PRINT PN$;" will be created 
and ready to run" 



2639 PRINT #1,"SAVE " ;Q$;PN$: CLOSE: END 



End 



make generally available. Readers also, indicate what computer you 



who would like to contribute to the 
collection — any computer, any lan- 
guage—should contact me. Others 
who just like to play word games and 
want more information should send a 
stamped, self-addressed envelope; 



own - Eric Balkan 

14704 Seneca Castle Court 

Gaithersburg, MD 20878 

Colin Alexander's review of the 
Brother Compactronic 60 typewrit- 



er/printer (March 1984, p. 240) in- 
cluded 14 patches that made our unit 
perform perfectly with Model III Su- 
perScripsit (used on the Model 4). 
Now, we've been presented with Mod- 
el 4 SuperScripsit 6.01 .00 and we find 
this version won't accept the patches. 
Can anyone help? 

Floyd Austin 

P.O. Box 827 

Greenville, CA 95947 

I'm collecting data for a national di- 
rectory of user's groups. The first edi- 
tion is scheduled for publication in the 
spring of 1985. If you'd like your 
group included, send me a stamped, 
self-addressed envelope; I'll send you 
a questionnaire. 

Ken Ryder 

P.O. Box 4102 

Rome, NY 13440 



Error Trap 

A minor typographical error in the 
listing for my Model 100 sort program 



UPGRADE 

Your TRS-80® Model III or 4 with a disk drive system from Micro-Design, 




UPGRADE w/one drive 
$399.00 



w/two slimline drives - 
$499.00 



The UPGRADE includes: MDX-6 controller board 
for 5 1 / 4 " drives, switching power supply, disk drive(s) 
of your choice, all necessary installation cables and 
hardware. 

Standard UPGRADE comes with one 40 track, full 
size drive - lust $399.00! 

Purchase an additional disk drive when you order 
your UPGRADE from Micro-Design and get two slim- 
line drives for only $499.00! You pay just $100.00 for 
the second drive! 



Two slimline drives fit neatly into one slot of your computer, leaving your second slot open for another two slim- 
lines, or a Micro-Design hard disk drive. 



Also Available: 

RS-232 Serial Port - MDX-10 - $64.95 
Phone Modem/Serial Port - MDX-5 - $159.95 
Memory Kits for the Model III and 4 



1KV i.mdv Corporation 

For more Micro-Design products, 




MICRO-DESIGN -<» 

Making The Most Of Your Micro. 

Call 1-800-531-5002 

In Texas, call 512^41-7890 

Mill H Mdiuhdid Rd . Austin T\ 7874S 
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You Can 
Take it 
With You 

Good News 
About Mass 
Storage 
For Today's 
Business 
Pharaoh 




Mass storage used t<> mean a i>i^. expensive unli ihai 
wasn't the least bit portable. And guarding against 
uninvited Intruders was a royal pain. Today "s 
business pharaoh can have portability and convenient 
security In one affordable mass storage system with 
5 or 10 megabyte removable cartridge hard disk 
systems I rum Micro-Design, vou can lake it with you. 

t se hard disk cartridges the same way y< nj use a 
floppy disk system Just switch them out .is needed 
one < artrtdge tor word) 'M>< essing, another fcx u< ( ouni 
Ing. and another tor backup storage. Add additional 
cartridges whenever you lik< 

Double duty, with cartridges you ^«'i bat kup 
capabilities Pi t s ihe benefit oi having .mother tt ill 5 
or 10 megabytes ol on-line storage added to your 

IKS ho* Model III or 4 

l*"ast. Cartridges run as fast, or Lister ih.m lixed hard 

disk drives A 5 megabyte backup 

lakes only .1 few minutes 
Switching out < .11 in. Iges 

l. ikes nisi .1 lew sci onds 



Convenient and 

Secure, it's 
< ,is\ 10 lock-up sens! 

live files jusl re 
move the 1 anri< Ige 

and pui it some 
where safe 11 you 
everyone can have 



• 463 



Unlimited Expansion, no more erasing old 

data ii» Increase spa e on youi hard disk Fact is. 
ihere's no limn 10 ihe amount of off-line storage you 

1 .in <n Id 

( mi da 1 a series 7. and 10 megabyte cartridge hard 
disks are external drives available in removable only. 
1 >i 1 talred with H >. 20, 01 33 megabyte fixed drives. Our 
sq Series features 5 megabyte cartridge drives In 
matt hing external cases or read) tor internal installa- 
tion They're all plug 1 omj taiible with no additional 
hardware required >m<\ youi t hok eol operating 
systems - li« >S 5 I, i>< SPLI IS 3.5. DOSPLUS 4 or 
I RSI OS 6.0 

Gel ihe « onvenier* e 1 >i portability In a mass storage 

-\ stem Ask your local computer dealer about Micro- 

Deslgn's versatile hard disk cartridge units, or. rail us 
loi del. ills 011 oui lull product line and ordering infor- 
mation. Dealer inquiries invited 




We've goi a complete Une of mass storage 
devices, including floppy drives. F J rices 
sum as low .is $1549 lor a 20 megabyte 
fixed hard disk drive. Call for our FREE 
( < ii. iii »g today! 



share .1 computer With others. 
tlieir own cartridge. 

iks* randy Corporation 
( me year warranty Nov.ork romportbtr 




Micro- Design 

Making Ihe Most Of Your Micro. 
( all I-8OO-531-S0O2. 

In Texas, call 512 -4-41 -7890. 

6301 B Manchaca Rd . Auitin. TX 78745 



• See List ol Advertisers on Page 176 
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("Sort Order," July 1984, p. 128) 
makes execution begin at the wrong 
memory location. The last two digits 
of line 500 are transposed; the correct- 
ed line is: 

500SAVEM "SORT.CO", 61960,62948,61986 

Ronald F. Balonis 

118 Rice St. 

Trucksville, PA 18708 

The Pulse Train sidebar "Who's 
Got Clout with Tandy?" (August 
1984, p. 24) incorrectly stated that a 
36-megabyte hard disk system is avail- 
able from Radio Shack on special or- 
der. According to Tandy's special 
projects coordinator, Pam Lanier, 
storage capacity is 30 megabytes and 
the disk drive is regularly stocked at 
Radio Shack stores. Lanier also says 
the correct address to write for infor- 
mation about the Tandy Computer 
Business User's Group (TCBUG) is 
TCBUG, P.O. Box 17580, Ft. Worth, 
TX 76102. 

— Eds. 


DEBUG 




I found it necessary to change two Chimes program for the Model 100 
lines in Program Listing 3 of "A Bet- (RAM Files, May 1984, p. 172). You 
ter Breed of Basic" (July 1984, p. should correct the three following 
94). They should read: program lines to read as listed: 

260 N$(ll) = "L2 E- C" 120 IF MID$(TIME$,4,2) = "30" THEN 
270 N$(12) = "L2 G L8 P8 A-A-A-" GOSUB 190: GOSUB 210: ELSE 140 

Jim Cornell 21Q N m val(LEFT$(time$,2)): if n>12 
San Antonio, TX then n = n- 12 ELSE if N=0 then 

N=12 

To correct a problem in line 240 of 280 for J = l to N: sound c,L: for k = i 
the TEXT6A program of "Bugs TO 300: NEXT: next: return 
from Outer Space" (August 1984, p. 
88), change the line to read: 

00240 defm *! " # ' ;6 The changes complete the chime at 

_, . , the half hour and correct the hourly 

*«, nJ r ge , r n j count at midnight; the change in line 
505 Ridge Lake Road m eliminates ■ throu ^ the 

Crestv,ew,FL 32536 time de iay bop in line 290 twice. 

James M. Stubchaer 

Readers have pointed out an omis- 869 N. Kellogg A ve. 

sion and an error in my Westminster Santa Barbara, CA 93111 







EASY TO USE INTEGRA TED SOFTWARE FROM PEL-TEK ■ ALL THREE MODULES. ONLY $99.00 



Word Processing from Pel-Tek 

"S&ochine 3.0 



FOR TRSe048KModl'lll*' 



Easiest to use Word Processor anywhere 

■ On screen formatting - what you type is 
what prints on the printer ■ Works with all 
printers ■ Graphics mode for TRS 80 block 
graphics (printer support needed) 

■ Embedded forms control — to skip 
lines, eject paper, terminate printing 

■ Embedded file retrieval during printout 
(called from text) allows chaining a 
document to any virtual length ■ Pause 
feature enter data into text line fields 
during printout, great for forms or form 
letters, especially when used with Multiple 
Copy feature ■ Insert /delete characters, 
lines, files, anywhere in your text ■ Text 
centering ■ Embed ASCII codes in your 
text to control your printer ■ Headers, 
Footers, page numbering ■ "Warm start" 
from DOS READY ■ Line oriented ■ Full 
screen text editing ■ Supports unmodified 
Model I for lower case ■ Integrates with 
Spell Check/Correct and DBLCOM 
communications packages ■ FREE . . . 
INDOOR SOCCER and JUMPY arcade 
games included! 



Proofreading From Pel 1 ek 

/pel check/ 
correct /y/*em 

Integrates with the Word Machine 3 
FOR TRS 8048K Modi HI, 4' 



Superb 30,000 Literal Word List 

■ Includes prefixes, suffixes, many proper 
names and geographic locations 

■ Integrates with the Word Machine 3.0 
without duplicating files ■ Can check 
ASCII files created by any Word Processor 

■ Streamlined menu driven operation 
makes it easier to use than any other Spelling 
Checker ■ Allows expansion of a secondary 
User Dictionary with words from your text 

■ Or create /edit your own User Dictionary 
using any Word Processor ■ Expand the 
main dictionary to up to 60,000 words 
automatically with words from the User 
Dictionary (Model III) ■ Works with a 
single disk configuration ■ Does spelling 
checking AND spelling corrections - no 
extra charge for the corrections feature 

■ Less than 1 /2 the price of any competing 
TRS-80 product, and performs better 
based on independent testing ■ Integrates 
with the Word Machine 3.0 with 
uninterrupted operation 



VISA • MASTERCARD • CHECK 

Money Orders Accepted 

Add $2.00 Postage and Handling 

Add $3.00 for CO. D. 



• Software operates 
Mod 4 in Mod III modej 

• Spell check will not 
work with Super 
Scnptset 



PEL-TEK ^324 

P.O. Box 1026 

Southampton, PA 18966 

Order Line: 1-800 523 2445, Ext. 19 

In PA: 1 800-346-7511. Ext. 19 



Communications from Saturday Software 

dblcom 

Integrates with the Word Machine 3 
FOR TRS 80 48K Mud III 1 ' 



Unique Split Screen for 
Sending/ Receiving 

■ Split screen feature avoids text 
"collisions" in Conference or "C.B." modes 

■ Prepare transmission text lines on bottom 
screen while normal transmissions are 
received on upper screen ■ Large capture 
buffer for incoming/outgoing text 

■ Printer spooling of buffer to save connect 
time ■ Dump buffer to printer, disk or 
communications line ■ Send all 26 ASCII 
control codes ■ Status line shows printer, 
buffer, and UART status ■ Supports 110. 
300, 1200 Baud ■ Selectable UARTS 

■ Auto Dialing ■ Optional line feed after 
carriage return ■ Optional local echo for 
half -duplex ■ Access to D.O.S. from within 
the program ■ Integrates with the Word 
Machine 3.0 to create or edit buffer text 
using Word Processing facilities 
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"I am amazed at the broad spectrum of 
technical articles you publish, for both 
novice and advanced programmers . . . " 




If you're still wondering which magazine you should 
buy for your TRS-80*, here's what 80 Micro readers 
have to say about their #1 system-specific information 
source 

• "Not only is the magazine very professionally done, 
but I have found something in almost every issue that 
has been worth the price of the subscription 

Roger I. Ilolstege 
MiUersvQle, MD 

#"I was greatly impressed by your magazine. 1 got more 
useful information from that one issue of 80 than I have 
from countless other sources. . . " 

John M. Crittenden 
Jackson, MS 

•"I have found 80 Micro to be the most valuable mag 

azine jx^rtaining to home computers on the market. . ." 

Willuim C. Hardin, fr 
Charlotte, VC 

80 Micro is the magazine for every TRS-80 user from 
beginner to advanced. 80 Micro is full of tutorials, free 
programs, hardware modifications, new product an- 
nouncements, product reviews, debugging tips, and 
more. 



And an 80 Micro subscription is risk free. If you're 
iidI completely satisfied, you'll be reimbursed for all un- 
delivered issues See what 80 Micro can do for you. It's 
#\ for a lot of people. Fill out this order form and send 
it in now. Enclose your payment and get a Kith issue free! 



• V ..! K.i.llo Sh.uk 



t at 7 an I 



r 



JL CS ! I want a no- risk subscription to the ma- 
gazine for beginner to advanced TRS-80 users. 

Send me 12 issues of 80 MICRO for $24.97! I understand 
that with payment enclosed or credit card order I will 
receive a FREE issue making a total of 1 3 issues for 
$24.97. 

I Check MO VISA DAE DMC !"~ Bill me $24.97 for 12 issues 

Card # Exp. Date 

Signature 

Name 

Add ress 

City 



.State. 



.Zip. 



34NF8 
Canada & Mexico, $27.97. Foreign surface. $44.97. 1 year only, 
US funds drawn on US bank. Please allow 6-8 weeks for delivery. 

BOfTIICrO • PO Box 981 • Famingdale, NY 11737 
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Version* avariaot* loi LDOS 5 1 and 
TRSOOS 6 (Specify when ordering) 
Available lor TRSOOS 6 only 
Available lor LDOS 5.1 only 



TBA is a text preprocessor that 
translates structured BASIC source" 
into interpreter executable programs. 
Supports long variable names and 
named references/procedures, along 
with conditional translation $79. 

BSORT/MOD324 is an advanced 
machine language sort lor M4 BASIC 
Multiple key /tag arrays, 1 or2dimen- 
sion, string or numeric arrays 
MOD324 does most of the restructur- 
ing to allow M3 BASIC programs to 
be run under M4 BASIC. $49. 

DiskDISK allows the partitioning ol 
large volume drives into smaller 
logical volumes which •look" |ust like 
additional (loppy drives This should 
be considered a must for hard disk or 
other "large" drive users $99. 

FED II is an all-purpose File/Disk 
editor for LDOS or TRSOOS 6 Bytes 
may be modified in either ASCII or 
HEX Location may be done via 
search string, load address or record 
number Shows disassembly of 'CMD 
files $49. 

FED86 is the LSI File and disk EDitor 
for the IBM-PC and fully PC-com- 
patable computers (not for the Tandy 
2000). running under PC/MS-DOS 2 

Any byte in any given file ordisk may 
be displayed and or altered. Display 
information includes 256 byte 
record display, filename (or disk 
relative sector) and drive number, 
record number and relative byte 
number within the current sector 
Also, the value of the byte under the 
cursor is displayed in HEX. decimal 
and binary 



FED86 also includes commands for 
HEX/ASCII/case independent string 
searches, printing record(s) and 
modification of data (in ASCII or 
HEX) $49. 

■ File Manager will handle all those 
COPY. MOVE PURGE or BACKUP 
lobs with ease Faster and more 
versatile than BACKUP or PURGE. 
FM can also produce a script" for 
later execution through JCL $49. 

•" Filter Package "1 contains fourteen 
useful filters for use with the LDOS 
5 1 system Some of these are 
XLATE (user-defined input/output 
translation). LISTBAS (BASIC 
prettyprint" filter), MONITOR 
(filters unprintable characters and 
replaces them with printable repre- 
sentations). TITLE (adds user- 
defined titles to printer output). 
SLASHO (slashes zeros on printers 
that can backspace). LINEFEED 
(add or remove LF after CR on any 
device). PAGEPAWS (pause printer 
after formfeed), and CALC 
(keyboard HEX/DEC/BINARY 
conversion and HEX add/sub filter) 
Includes source code. $39. 

" Filter Package #2 has nine more 
filters for LDOS 5 . 1. Theprogramson 
Filter »2 include KSMPLUS (like 
KSM but allows key re-definition 
on-the-fly") MAXLATE (like XLATE 
on Filter *1, but each character pass- 
ing through can "trigger a group of 
translate characters) COMMi 
(communications filter - tests for 
modem carrier, provides adjustable 
delay between characters also can 
provide linefeeds and nulls) 
Includes source code $39. 



LSI ORDER FORM 



Name. 

Company: 

Address: 

City: 

Foreign: 



Date: 



State: 



Zip:. 



Phone (9-5): 



/stem is a 



The LSI HELP System is a complete 
series of packages to provide on-line 
help information to LDOS/TRSDOS 
6 users Packages are available for 
DOS/BASIC help. Technical help, 
and the development of additional 
"HELP information files Prices start 
at $29. 

LS-HOST 'TERM is a complete Mod 4 
communications system Includes 
ADDS25 terminal emulator. 
XMODEM file transfer utility for 
error-free transfer. HOST program 
with password protection and much, 
much more. Ideal for use with 
XENIX $199. 

Inventory Master is designed to fill 
the inventory control needs of many 
retail operations. IM maintains in- 
stock on-order and minimum-to- 
stock quantities, in addition to 
historical sales information IM 
handles up to 2700 stock items, in- 
stock and on-order quantities up to 
10.000. with sales per item of up to 
30,000 pieces or $1 000.000 Please 
call or write for more details IM is for 
the Model 3 mode only, and is 
supplied on a run-time version of 
smal-LDOS $99. 

LED is the LSI full-screen text EDitor 
Uses all LDOS special features 
(KSM, filters/drivers. ). Excellent 
for editing KSM and JCL source files 
T6 version includes ' block write to 
disk" and insert file at cursor" $49. 
MailFile Series II is a complete 
mailing list management system for 
the small list user. Model 1 - 600 
names per list (1000 with double- 
density) Model 2M2 - 2500 names 
per list and Model 3 - 1200 names per 



list Names are constantly maintain- 
ed in sorted sequence Maii-File will 
print 3 or 4 line labels, in either single 
or multiple across formats A user 
defined format is also available 
Pleasecall or write for more informa- 
tion. Mail/File for the 1 and 3 is 
supplied on a run-time version of 
smal-LDOS Mail/File for the Model 
212 is for TRSDOS 2 'only $99. 

LS-QFB/Comp consists of two 
utilities QFB performs a Mast" 
mirror-image backup of a disk, 
formatting the destination disk in the 
process Comp will compare any two 
disks or files, with differences to 
display or printer. $49. 

"The Source" is 'The' commented 
source code tor TRSDOS 6 2 A must 
for all TRSDOS 6 programmers. 
Complete three volume set is $249. 

Utility Disk «1 is a useful collection of 
programs and utilities for use with 
the LDOS 5.1 Operating System 
Some of the programs included on 
Utility *1 are COMP (file/disk com- 
pare), DCT (view/modify DCTs). 
DIRCHECK (check/fix directories), 
HIGH (map memory allocation), 
MAP (map disk allocation), 
RAMTEST (test memory), RDTEST 
(read test of drives and diskettes), 
READ40 (reads 40 track disks in 80 
track drives), TYPEIN (controls 
many programs that will not work 
with JCL), UNKILL (recovers killed 
files) and WRTEST (write test of 
drives and diskettes). $49. 

The LS-Utillty Disk is a collection of 
the most popular LSI filters and 
utilities re-written for use under 
TRSDOS 6 on the Mod 4 Includes 
KSMPLUS. MAXLATE. CALC. 
READ40 and much, much 
more $49. 



Payment □ Check/MO (pre-paid) □ COD. D MasterCard □ VISA 
Card Number: Expiration Date: 

Signature 



Qty. Catalog # 



Description 



Price 



Extension 



Less 



_°'o Quantity Discount 



Handling (strike out if pre-paid) 

items times $1 shipping each 

Wl, add 5%- Sales Tax on total above 
Total Amount Due 



S5.0G 



ORDERING INSTRUCTIONS 

The following shipping/handling tees and order policies apply to 
an orders placed from this catalog, and all orders placed after June 
1st. 1984 Order policy and shipping' handling charges may be 
altered at any time by LSI 

There is a five dollar charge for handling on each order.This charge 
will be waived on pre-paid orders placed lor delivery in the United 
States Pre-paid means "orders that include an enclosed check or 
money order " 

In addition, there is a $1 per item shipping charge tor shipping in 
the US, Canada and Mexico This covers UPS ground or First Class 
Mail shipment (US) or Air shipment {Canada. Mexico) For any 
other shipping method the additional shipping charges will be 
added to the order If a premium shipping method is desired, please 
call and find out the additional amount to send if the order is paid 
for by credit card the correct total will be charged automatically. 

Orders outside the US, Canada and Mexico must be paid by 
MasterCard or VISA, and the total shipping charges will be added 
to the order. No other torm of payment will be accepted, due to the 
inability to accurately pre-determine shipping costs, and the 
additional cost involved in handling loreign bank drafts 

For all orders, the following discount policy will apply: 
Quantity - mix or match Discount Percentage 



One 


Net (0%) 


Two 


10 percent 


Three 


15 percent 


Four 


20 percent 


Five or more 


25 percent 



Write or call for our tree catalog. 



JOGICAL 
WSTEMS 



8970 North 55th Street 
P.O. Box 23956 
Milwaukee, Wl 53223 

(414) 355-5454 ^301 



Prices and specifications subject to change without notice 
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Prosoft's Allwrite: 
Better Than All Right 



by Terry Kepner 



edited by Ryan Davis- Wright 



At last — a world-class 
word processor for 
the Radio Shack Model 
I/III/4 computers. All- 
write does almost any- 
thing you could want in a 
word processor, yet it's so 
simple that you can leam 
to use it in only a few 
minutes. 

Allwrite has so many 
features that it's difficult 
to decide which ones to 
write about. Here's a sam- 
ple of the most useful and 
unusual ones. 

Allwrite supports defin- 
able screen line widths, 22 
programmable function 
keys, text recovery, auto- 
matic hyphenation, file status indica- 
tor, footnotes, text preview, text block 
insertion, If. . .Then selective printing 
instructions, and multiple columns of 
text. It also supports true proportional 
spacing; automatic index and table-of- 
contents generation; multiple columns 
per page; top and bottom page titling; 
underline, boldface, double-width, 
and italic characters; superscript, sub- 
script, and backspace capability; 
hanging indentation (also called bul- 
lets); embedded printer graphics; 
printing of selected pages rather than 
an entire manuscript; setting special 
tabs to allow left- and right-column 
justification; and centered text and 
decimal column justification (lining 
up numbers on the decimal). And 
that's only a partial list. 

Combine these features with All- 
write's ease of use and you'll under- 
stand my enthusiasm. You can bypass 
the instruction manual and tutorial 
altogether and sit down and start 
working. And if you should get stuck, 
you can refer to Allwrite's compre- 
hensive built-in Help file to answer 




ustration by Katherine Mahoney 



any questions on program operations. 
It's that easy. 

Son of Newscript 

Allwrite was developed by Prosoft, 
the people who sell the Newscript 
word processing system. But Allwrite 
isn't just a Newscript upgrade: it's a 
whole new system, with all the advan- 
tages of Newscript and none of its dis- 
advantages. 

I've been using Newscript almost 
from the day it was released. In that 
time it has earned my respect because 
of its capabilities: large-based printer 
support (automatic daisy-wheel sup- 
port), transportability between Radio 
Shack computers, automatic table-of- 
contents generation, automatic index 
generation, no loss of characters when 
typing, the ability to chain files and 
create manuscripts hundreds of pages 
long, and dozens of other features that 
make life simpler for writers. 

On the other side of the coin, New- 
script has earned my ire for some of its 
deficiencies: it's slow in saving, load- 
ing, and printing files; it's line-orient- 



ed instead of character- 
oriented; making tables 
wider than 60 characters 
takes lots of work; a 
rather small work space in 
memory (12-15K depend- 
ing on which computer 
you use), and a few other 
frustrating "features." 
But in spite of its flaws, 
Newscript was the only 
word processor that could 
conveniently do what I 
wanted. 

Allwrite has now sup- 
planted Newscript as my 
word processor of choice, 
and it only took five min- 
utes to do so. 

The Package 

Allwrite comes on a 
double-sided flippy disk. 
If you have a Model I, the disk con- 
tains DOSPLUS TDOS on both sides, 
and both sides are used for all the 
modules of the Allwrite system. 

The Model III disk has TDOS on 
one side and TRSDOS 1.3 on the oth- 
er, with the entire Allwrite system on 
both sides. The Model 4 disk has TRS- 
DOS 6.2 on side 1 and DOSPLUS IV 
on the other, again with Allwrite on 
both sides. This approach reduces 
problems for customers when order- 
ing the program for their computers. 

Setting up Allwrite for your com- 
puter is a bit complex. However, if 
you carefully follow the on-screen in- 
structions (or if you actually read the 
directions in the manual), you can 
quickly customize Allwrite to your 
computer and printer (you can even 
set up three printer tables, letting you 
switch among three printers). 

The distribution disks for all the 
computers have the same programs: a 
text input program (18K); a text for- 
matter program (28K); an installation 
specification table (1.5K); specifica- 
tions for the index, table of contents, 
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and other special files (1.5K); Allwrite 
keyboard driver (1.5K); a disconnect 
that returns you to your DOS key- 
board driver (1.5K); an on-line help 
file (25. 5K); a utility that converts in- 
dividual Newscript files to Allwrite 
format (12K); a Basic program that 
converts an entire disk of Newscript 
files to Allwrite format (1.5K); a utili- 
ty that customizes Allwrite for your 
computer system (16.5K); a utility that 
creates a sorted index file (1.5K); a 
printer table (19.5K); a daisy-wheel 
and thimble printer table (1.5K each); 
and three sample text files. 

In actual use you only need the text 
input program, the text formatter pro- 
gram, the installation specification 
program, and your printer table. If 
you want to create indexes, tables of 
contents, mail labels, or legal docu- 
ments, you also need the specifications 
utility for those features. If you decide 
to use the Prosoft keyboard driver, 
which supplies a type-ahead buffer so 
you won't lose characters, you need 
the Allwrite keyboard driver. Finally, 
if you have room on your drive-zero 
disk or an available data drive, you 
should have the Help file on-line. 

Once you set up your Allwrite sys- 
tem disk, you're ready to work. When 
you start, the Prosoft logo appears on 
the display, and you're prompted for 
the file name of the document you 
want to use. If it isn't already on-line, 
Allwrite advises you that the file name 
you gave it is a new file and prompts 
for confirmation before entering the 
text editor. If the file is on-line, it's im- 
mediately loaded into memory, and 
boy is it fast — only three seconds to 
load a 25K file. 

If you're using a Model I, III, or 
Lobo Max-80 computer, the display is 
64 characters wide by 16 lines long. On 
the Model 4, the display is 80 columns 
wide by 24 lines long. Outside of this, 
the Model 4 version is identical in op- 
eration to the other versions (unless 
you have a 128K Model 4, then you 
can memory-bank your files so that 
you can have up to 90K of text in 
memory simultaneously). 

Allwrite is an ASCII text editor and 
you can load, manipulate, and save to 
disk any ASCII file with Allwrite. If 
you have any files created by another 
word processor, Allwrite can use them 
as long as you save them to disk in 
ASCII format. 



One feature Allwrite 

provides that's lacking 

in most other 

word processors is a 
status command to tell 

you about your file. 



If you have any Newscript files, the 
Newscript converter utility scans 
them, changing them to the Allwrite 
format (the control line character is 
changed from a period to a semicolon, 
the carriage returns at the end of each 
Newscript line are removed, and cer- 
tain Newscript control words are 
changed to match new Allwrite 
words). If you have a disk of New- 
script files, the disk converter program 
builds a special file that the Newscript 
converter reads, automatically refor- 
matting all the disk files rather than 
prompting for each file name as it nor- 
mally would. 

Allwrite Text Editor 

Once you load your file, Allwrite 
clears the screen and positions the cur- 
sor at the upper left-hand corner. Now 
you can start typing. When you reach 
the end of the screen, the cursor auto- 
matically goes down and over to the 
next line. If you want, you can rede- 



ADwrite 

***** 



Prosoft 

P.O. Box 560 

North Hollywood, CA 91603 

Models I and III, 48K RAM 

Model 4, 64K RAM 

Two disk drives, or one disk drive 

and one hard drive 

$249.95 



Easy to use? 


***** 


Good docs? 


***** 


Bug free? 


***** 


Does the job? 


***** 



fine the screen width so that you can 
format lines longer than 64 characters 
wide, making it easier to prepare 
tables of information. You select the 
maximum width allowed for this pur- 
pose in the installation procedure. 
You would normally choose a maxi- 
mum width of 80 characters since 
that's the limit of standard 8!/2-inch 
paper using 10 characters per inch 
printing, but you can specify up to 254 
characters per line in the installation 
process. If you use the Length com- 
mand to reset the normal screen 
width, the entire display scrolls to the 
left when you reach the right edge of 
the screen. 

In addition to the arrow keys, you 
have 41 control keys to maneuver the 
cursor and text around in the text 
buffer. The control key is the clear 
key, and all keys repeat if held down. 
You can specify how much time you 
want to pass before a key starts 
repeating itself and how fast it repeats 
when you set up the installation pro- 
gram. 

You also have 36 commands avail- 
able as text editor commands. These 
provide the more complex functions 
such as getting a disk directory, text 
search and replace, file statistics, and 
so forth. One feature Allwrite pro- 
vides that's lacking in most other word 
processors is a status command to tell 
you about your file. Allwrite not only 
tells you the number of characters cur- 
rently in your file, it also tells you how 
many characters are left, the total 
space available, the word count, line 
count, current screen width, type of 
printer selected, number of changes 
you've made to the text, the name of 
the last file edited, the current file's 
name, the name of the next file (if 
you're invoking the Link command), 
the text last used for Search, the text 
last used for Replace, and, if you're 
using a 128K Model 4, which RAM 
area you're currently using (1, 2, or 3). 

Another useful feature involves 
"soft" keys. These are 22 keys (the 
numerals zero to nine, both normal 
and shifted, and the characters X, Y, 
and Z) to which you can assign defini- 
tions. You can define them to stand 
for anything normally typed in from 
the keyboard, including commands, es- 
cape sequences, control keys, words, 
phrases, and even other soft keys. 

To use one, you press the clear key 
and the appropriate soft key. Each 
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Please send me the Infocom interactive stories listed below. 

(I understand that all prices are effective as of September 1. 1984.) 
Sampler @ $7.95 _ DEADLINE" @ $49.95 

ZORK" I (see note)" The WITNESS'*® $39.95 

! ZORKII@$44.95 STARC ROSS"® $49.95 

ZORK III @ $44.95 I I'LANETFALL'"® $39.95 

ENCHANTER'"® $39.95 M SPENDEI)"® $49.95 

I J SORCERER'"® $44.95 INFIDEI. ' «, SII.Hf. 

"ZOKK I is available exclusively throuKti Rachu Stuck dealers 

Please check one: TRS-HO Model I i I TRS-80 Model III 

My age range (Please check the correct box): 

U Under 6 D6-U 12-17 I 118-24 25 35 [J 36-49 D50 + 

Please indicate the payment method you chose. 

Make check payable to Infocom, Inc. (Please do not send cash.) 

□ Check I 1 Money Order I MasterCard 

I ) Visa D American Express 



Exp Date (Mo t fta 



































Card Number 

• Total for games ordered: 

• Add $2.00 for postage and handling for each game: 






• For New York residents only, include sales tax: 

• Total enclosed: 






































Name 




































Address 
































City 






















Slate 




Zip 





































Country, if not U s 

Mail to: Infocom, Inc., CS6237, Farmingdale. NY 11735 
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12 PROBLEMS 
WITH THIS COUPON. 



BE FOREWARNED! Just because 
we've made Infocom's 
interactive fiction soft- 
ware compatible with 
yourTRS-80ModelIor 
Model III computer doesn't mean 
your problems are over. 

In fact, they're really just begin- 
ning. Because no other computer 
software ""wesa&ar 
challenges, 
stimulates, 
provokes 
and involves your imagination with 
quite the power-or the force— 
of interactive fiction. Once you've 
experienced it, you're 
A going to be hooked. 





HERE'S WHERE YOUR PROBLEMS 
REALLY BEGIN. The Infocom 
FOUR-IN-ONE sampler, excerpts 
from four of 
Infocom's clas- 
sic stories plus 
a tutorial on 
how to get involved. The ZORK' 
trilogy, Infocom's best-selling odys- 
sey of treasure, challenge and high 
adventure in the exotic and enchanted 
world of the Underground 
Kingdom. ENCHANTER," 
the inception of a spellbind- 
ing series in the Zorkian 
tradition. SORCERER," in which 
you'll gain the power and cunning of 
a true sorcerer. Or else. 

The WITNESS; a 
hard-boiled whodunit 
thriller of the thirties. 
DEADLINE/ a fast- 






paced mysterv with time as 

the enemy. PLANETFALL; 

the spectacular comedy of 

the last frontier. 
STARCROSS," our astounding science 
fiction mind-bender. SUSPENDED," 
the cryogenic nightmare on the edge 
of the far future. INFIDEL," high 
adventure among the pyramids. 

EVERYONE SHOULD HAVE SUCH 
PROBLEMS. So fill out the coupon 
and mail it right now. It's 
going to lead to problems- 
we can't deny it. Ah, but 
think of the fun. 

inFocom 

/ORK cs a registered trademark of Infocom. Inc 
hPU.I INK. I In- WITNESS VIARcROSS. SUSPUNDED 
F'l.ANETrALL. ENCHANTER. INFIDEL md M>k( KRKR 
are tradeuui l^ ul InfacoSfl, Inc. 
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soft key holds 22 characters, but if 
that's not enough room you can call 
one soft key from another, chaining 
them together. The only disadvantage 
to the soft keys is also their advantage: 
they accept every keystroke as a valid 
command, including control keys, so 
if you make a mistake, you can't use 
the backspace key to go back and fix 
the error. Instead, you must end the 
definition and restart it. 

Allwrite also provides a command, 
Whoops, that lets you recover from a 
mistake. For example, if you've just 
accidentally erased three lines, press- 
ing the break key and typing in 
WHOOPS restores all the text on the 
screen to its original condition. You 
may lose some editing changes, but 
you'll recover the text you lost. This 
has saved me several times. However, 
Whoops is limited to the text displayed 
on the screen, so anything that has 
scrolled off, either up or down, can't 
be recovered with this command. 

Allwrite supports both manual and 
automatic hyphenation. With manual 
hyphenation, you set "soft" hyphens 
in each word you expect to find at the 
end of a line, and the text formatter 
uses this hyphen, if needed, to even 
out the right margin or reduce the 
character spacing when using full jus- 
tification. 

Automatic hyphenation uses Elec- 
tric Webster's preprogrammed hy- 
phens to soft hyphenate every word in 
your file. The soft hyphens aren't 
printed unless the word needs to be 
split between two lines. This is more 
convenient than the manual method, 
and much more accurate since Electric 
Webster marks only the correct posi- 
tions for word breaks. The disadvan- 
tage is that it increases the size of your 
file by about 20 percent, but that's a 
small price to pay for neat text mar- 
gins and spacing in the finished docu- 
ment. 

Text Formatting 

You usually embed text formatting 
commands in the actual text of your 
document. You put them on a line by 
themselves, with each command start- 
ing with the semicolon. To get the 
commands on a separate line, you 
have to terminate the previous line of 
text with a carriage return, symbolized 
by a backwards graphic "L." If the 
previous line isn't terminated with a 
carriage return, Allwrite considers the 



If you accidentally 

erase three lines, 

press the break key 

and type WHOOPS 

to restore the text 

on the screen to 

its original condition. 



command line an extension of the pre- 
vious text. 

The text formatter responds to 79 
commands, giving it unprecedented 
flexibility. Not only do you have com- 
plete control over the margins, justifi- 
cation, and standard formats in the 
document, you also have control over 
things like embedding other files in the 
document you're printing, appending 
files into a long chain, establishing the 
parameters for true footnoting, pre- 
viewing the document on your video, 
changing line printer pitch, using 
logical If. . .Then instructions to con- 
trol printing sequences, and printing 
multiple columns of text on any 
printer. 

The logical operations are a bit 
complex and require some program- 
ming skill, but once you get the hang 
of them, they become indispensable. 
By using labels to define blocks of 
text, you can use the logic operations 
to select which block you want to 
print. You can set up a form letter for 
dealing with delinquent accounts that 
would change the body of a letter ac- 
cording to whether the recipient was 
30, 60, or 90 days overdue. This logic 
selection is limited to integer numbers 
in the range - 32768 to + 32767. 

Allwrite can do all this because it 
formats each page of your document 
in RAM before it starts printing. It 
knows just how many lines it will print 
per page and the exact format of each 
line before it sends the first character 
to your printer. For multiple columns, 
it lays out the page in memory exactly 
the way it'll appear on paper. 

Summary 

Allwrite is a professional system 
that sets a new standard in word pro- 
cessing. It's powerful and easy to learn 
and use. The on-line help file means 



you shouldn't have to bother with the 
manual except for complex or little- 
used features. The tutorial, while nice, 
is almost unnecessary for all but the 
true word processor novice. 

Allwrite lets you use all your print- 
er's features with a minimum of trou- 
ble, no matter how simple or complex. 

The table-of-contents and index 
generation features are invaluable in 
preparing long documents or books, 
and they're limited only by your com- 
puter's memory constraints. On my 
machine, the maximum size of an in- 
dex file is 35K, almost 15 pages of 
double-column listings. And the table 
of contents can be just as large. 

Allwrite even supports the special 
needs of the legal community, with 
their "boilerplate" documents and 
unusual line numbering requirements. 

Allwrite is a serious tool for the seri- 
ous writer. While it may be a bit pricey, 
it's worth every penny in improved 
productivity and capabilities. ■ 



Priced-Less Printers: 
Three Radio Shack Entries 

by Beve Woodbury 
and Mare-Anne Jarvela 

Radio Shack recently introduced 
three new dot-matrix printers for 
under $1,000. They are the DMP-110, 
the DMP-120, and the DMP-420. 
While all three printers performed 
well, they differed in print quality and 
features offered. For instance, the 
DMP-110 had the poorest quality 
print but provided some useful fea- 
tures like superscripting and subscript- 
ing. On the other hand, the DMP-120 
produced clear print, but lacked the 
1 10's variety of print styles. 

We compared printing speed, print 
quality, and features for each print 
er. For a quick comparison, see Table 
1 on p. 40. 



10 AS = TIMES 

20 FOR K = 1 TO 50 

30 LPRINT "TESTING FOR TIME"; 

40 NEXT K 

50 B$ = TIMES 

60 LPRINT:LPRINT:LPRINT AS.BS 

Figure. Printing speed test. 
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Photo I. DMP-110. 

The DMP-110 

This is the least expensive of Radio 
Shack's dot-matrix printers. It also 
produced the least readable print. 

Physical Description and Set-up 

The $399 DMP-110 is one of the 
smallest printers Radio Shack offers 
(4'/2 by I6I/2 by 12'/2 inches and weigh- 
ing about 12 lbs.). Like the DMP-120 
and -420, the DMP-1 10 is ivory with a 
small black control panel. It accepts 
fan-fold (tractor-feed) or single-sheet 
paper, no wider than 10 inches. 

The DMP-110 is simple to set up 
and hooks up to a serial or parallel 
computer. The 1 10's input switch is on 
the rear of the printer with the serial 
input offering a choice of 600- or 
1,200-baud operation. 

Specifications 

The DMP-110 functions in three 
different modes: data processing, 
word processing, and graphics print- 
ing. The data and word processing 
modes work in a similar manner, the 
only difference being in the line-feed 



DMP-110 

*** 



Tandy /Radio Shack 
One Tandy Center 
Fort Worth, TX 76102 
$399 



Easy to use? ****-& 
Good docs? ***^r& 
WeUmade? *•*■&■& 
Does the job? ***-&& 



Photo 2. DMP-120. 

commands. In the word processing 
mode, a line feed advances the paper 
instantly, which doesn't occur in the 
data processing mode. 

The printer offers six different char- 
acter fonts: standard, condensed, cor- 
respondence-quality (double-strike), 
proportionally spaced, italics, and 
micro font. In addition, you can print 
the standard characters in two widths: 
normal, at 10 characters per inch (cpi), 
and elite, at 12 cpi. You can also 
elongate (double the width of) any of 
the character styles. The correspon- 
dence-quality and proportionally 
spaced character sets include 64 spe- 
cial and European characters. 

Boldfaced characters and underlin- 
ing are available by using certain con- 
trol codes. The 1 10 also supports su- 
perscripting and subscripting, a handy 
feature that works well. 

The graphics mode lets you position 
the print head (a two-hammer system) 
where you want to print a dot on the 
paper. The manual gives an example 
of "freehand drawing." But after en- 
tering all the data (and there's a lot to 
enter, even for a small picture) we didn't 



DMP-120 

*** 



Tandy /Radio Shack 
One Tandy Center 
Fort Worth, TX 76102 
$499.95 



Easy to use? ****# 
Good docs? ***-&"& 
WeUmade? ***-&"& 
Does the job? ****-& 



Photo 3. DMP-420. 

get the result we or the manual wanted. 
Could there be typos in the manual? 

Even though we didn't have any luck 
with free-form drawing, one nice fea- 
ture is that you can combine graphics 
with text. 

The first DMP-110 we received to 
review had a problem. The print head 
would stick half-way through printing 
a line, and you would have to tum the 
machine off and on to get it to unstick. 
The replacement printer functioned 
perfectly. 

The Documentation 

The manual is easy to follow and 
has several short programs to demon- 
strate printer features; we didn't have 
trouble with any of them. A schematic 
diagram and a section called "If You 
Have a Problem" round out the 
manual. 

While it's an easy-to-use printer 
with a variety of font styles, the 
DMP-110 is somewhat restrictive. The 
print is readable but doesn't quite 
measure up to the almost -letter-quali- 
ty print of the DMP-120 or DMP-420. 
It's the slowest of the three printers 



DMP-420 

**** 



Tandy/Radio Shack 
One Tandy Center 
Fort Worth, TX 76102 
$999 



Easy to use? 


••••# 


Good docs? 


••••<& 


WeU made? 


••••* 


Does the job? 


••••* 
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and the graphics are limited to bit- 
matrix only. 

If you're looking for more than this 
in a printer, you should consider a 
slightly more expensive one. While it 
does a decent job, the DMP-110 defi- 
nitely has some limitations. 

The DMP-120 

Quality of print makes the DMP- 
120 well worth the $100 over the 
DMP-110. The letters are crisp, clear, 
and come close to letter-quality. While 
the DMP-120 lacks several of the 
DMP-110's features (such as different 
print fonts), it's certainly the better 
printer. 

Physical Description and Set-up 

This compact printer measures 5 by 
16'/2 by 13 Yi inches and weighs about 
16 pounds. If you use roll paper, the 
paper roll holder adds seven inches to 
the depth. You wouldn't call it a quiet 
printer, but you've probably heard a 
lot louder ones. 

The set-up is quick and easy and di- 
rections are clear and simple. Dia- 
grams and instructions step you 
through loading each of the three 



The DMP-120 lacks 

some features, but it's 

better than the DMP-110. 



kinds of paper the DMP-120 accepts: 
single-sheet, roll, and tractor-feed. 

There is the choice of an 8-bit paral- 
lel interface or an 8-bit, 600 or 1,200 
bits-per-second serial interface. You 
can use this printer with all the TRS-80 
computers, including the Color Com- 
puters. 

Specifications 

Bidirectional carriage motion prints 
approximately 120 characters per sec- 
ond in standard pitch, 80 characters 
per line and 6, 8, or 12 lines per inch 
(computer-selectable). In a printing 
test we ran (see the Program Listing), 
the DMP-120 printed twice as fast as 
the DMP-110. 

You have the option of two printing 
modes: character printing for text, 
and graphics mode for pictures or 
graphs. You can print both on the 
same line and each has a normal (10 



Specification 


DMP-110 


DMP-120 


DMP-420 


Price 


$399 


$499.95 


$999 


Weight 


12 lbs. 


16 lbs. 


35 lbs. 


Paper: 








Fanfold 


Yes 


Yes 


Yes 


Single-sheet 


Yes 


Yes 


Yes 


Roll 


No 


Yes 


No 


Serial 


Yes 


Yes 


Yes 


Parallel 


Yes 


Yes 


Yes 


Speed* 


23 seconds 


12 seconds 


7 seconds 


Self-test 


No 


Yes 


Yes 


Print fonts: 








Standard 


Yes 


Yes 


Yes 


Condensed 


Yes 


Yes 


Yes 


Correspondence 


Yes 


No 


Yes 


Proportional 


Yes 


No 


Yes 


Italic 


Yes 


No 


No 


Microfont 


Yes 


No 


No 


Print modes: 








Data processing 


Yes 


Yes 


Yes 


Word processing 


Yes 


No 


Yes 


Graphics 


Yes 


Yes 


Yes 


Super-/subscript 


Yes 


No 


Yes 


Underline 


Yes 


Yes 


Yes 


Elongated 


Yes 


Yes 


Yes 


Boldface 


Yes 


No 


Yes 


Right-Justify 


Yes 


No 


Yes 


Table 1. Comparison 


of the DMP-110, 


DMP-120, and DMP-420 printers. 



cpi) and condensed (16.7 cpi) pitch. 
The character printing mode also has 
an elongated pitch for normal (5 cpi) 
and condensed (8.35 cpi) modes. Con- 
trol codes provide underlining, but not 
subscripts or superscripts. 

The standard ASCII characters are 
available as well as a set of 30 block 
graphics and 25 European symbol 
codes. Be forewarned that these codes 
are in a different order on the Model 
4P. POKE 16892,02 on the Model 4P 
to put them in the correct order. 

The bit graphics are printed with 
clear, well-defined edges. The block 
graphics set, according to the manual, 
"is not fully compatible with the 
screen graphics of any of the TRS-80 
computers; rather it is a unique char- 
acter set." 

The Documentation 

Most of the manual is clear and easy 
to understand, but it lacks an index, 
which would be helpful for reference. 
There are sections on care and main- 
tenance, troubleshooting, interfacing, 
and a schematic diagram. 

The manual does offer several small 
programs to demonstrate the use of 
the printer. Unfortunately, the ex- 
planations of just what the programs 
do are unclear. For example, the pro- 
gram on page 33 to demonstrate the 
use of bit graphics for drawings is pre- 
sented in a confusing way and is out of 
order. Despite what the manual says, 
the end product is certainly not 
"worth the effort." And the program 
doesn't work correctly. A page of cor- 
rections is available if you call Radio 
Shack customer service. But even with 
the corrections, we couldn't decipher 
the picture. 

The manual mentions that the seven 
vertical dots in a dot-column aren't 
numbered 1-7, but fails to mention 
that they are numbered 1, 2, 4, 8, 16, 
32, 64. The lack of explanation on use 
of the graphics would be especially 
frustrating for a beginner attempting 
to learn how to use the printer for 
graphics applications. 

The DMP-120 would be our choice 
for a printer. While the graphics docu- 
mentation is lacking, and it's a little 
disappointing to sacrifice super-/sub- 
scripting and italics, it has excellent 
print quality and the size and price are 
attractive. It's comparable to the 
DMP-420 on a features/cost basis. 

Continued on p. 178 
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DATAGRAPH 



PRINTER 

GRAPHICS 

PROGRAM 



TRANSFORM YOUR VISICALC "OR MULTIPLAN "FILES INTO HIGH-RESOLUTION 
CUSTOM GRAPHS ON YOUR TRS-80 "COMPUTER AND GRAPHICS PRINTER. 



ELECTRONIC WORKSHEET 



_ 






PATENTS AND LICENSES <200) .4V. 
ACCOUNTS RECEIVABLE <4000) 7.8X 

CORPORATE BONDS <?00> I . 7X , 
INSURANCE PREPAID (300> .&/. 

PREFERRED STOCK (500.2) l"/.> 
AIRCRAFT LEASE (2000) 3.9V. S 
SECURITIES < 1000J 1.9V. 
TRUCKS < 1288.45) 2.5*/ 
CAPITAL STOCK < 393) .8VJ- 



REAL ESTATE <5000) 9.7V. 



I_ I «ES I 



1 



SE. DATA 

.:uMUo-Ti"E 

iN6TANTAN£0U8 ( CURREN' 




OFFICE BUILDING 



- U 
i LARGE DATA 



SELECTABLE 
• sg. to 7" 



» HIGH P-ESOLJ r ION 
data B oi nts/ inch. 
CAPAC! i • 

Point* p»r graph. 
GRAPH SIZES - Fro 
: 24' « STANDARD DATA SOURCE - 
Plots Data *ro<n VISICALC or 
MULTIPLAN Spreadsheets u»mq the 
DIF'" or SYLK Format*. • GRAPH 
FEATURE SELECTION - Fill Out 
Pre-*ormated wor^thftt For* *ith 
VISICALC or MULTIPLAN Program. 
> MINIMAL ENTRY REOU IREMENTS - 
Enter only nam* o* Data* i la 1 and 
location therein o* data to be 
plotted, « MULTIPLE FUNCTION 

GRAPHS - Plots over 10 Data 

Sets per graph. « DATA SYMBOLS - Plots data with user 
symbol shapes. « DATA I N t ERPOt AT ION - connects data points 
composed line shapes. . 

- 
CUSTOM LINES AND SYMBOLS - Has 
*or coapoiing symbol shapes. • 
♦ or vase of graph interpretation. 

qnd lines. • CALENDAR SCALE 

horizontal scale. « CURVE 
Fit, Stairstep. Bargraphs. 
E tends graph beyond *ho 
DESCRIPTIONS - Prints text 
legend. • TEXT ENTRYS - P 



MODEL I, III, IV 
$79.95 

PIE CHART OPTION: 
$34.95 

MODEL 11/12/16 
$129.95* 

•INCLUDES PIE CHARTS 



composed 
nth user 
. 
line'symbol libraries. » 

interacti/e screen-grapni cs program 
AUTO SCALING - Selects scale values 
User adlustable Mantissa Table. • 
.electable pattt i I 
Optionally prints names o* month on 
SELECTION - Can Hi • Scatter, Ltna, Curve- 
• . I OPTIONAL MIN/MAX VALUES ■ 
alues of the Data Sets. » DATA SF T 
escri pt ions of each Data Set in graph 
nts graph title, a» i s labels, and date on 
_rapn. • USER FRIENDLY - Checks validity of input data and displays 
cause of errors. » COMPLETE DOCUMENTATION - Comprehensive IO0 page 
Users Manual with examples covering data preparation, graph feature 
entry, composing lines and symbols, and technical notes. 



USER REQUIREMENTS 



COMPUTER 

• ll<s BO MODEL I III 48K 

• TRS-M MODE! rV 

• rRS-*> MODEL II 
SPREADSHEET PROGRAM 
• 

• MUI nPLAN ■ ■ 
DOS 

• TRSDOS 

• NEWD 

DISK DRIVES • I 'i lAI 



GRAPHICS PRINTER: 

• MX-80 GRAFTRAX, OR GT + 

• MX-100, TX. RX 80 100 

• LP VIII, DMP 120-500, 2100 

• NEC 8023 A-C, C.ITOH 8510 

• IDS 460 560, 480, 80 132 

• OKIDATA 82 83, 92 93, 84 

• GEMINI 10X 15X 
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DEALER 

INQUIRIES 
WELCOME 



TO ORDER: Send purchase order, check, or COD request. Specify Computer, Spreadsheet Program, 
and Printer Type. Include 52.50 for postage and handling. Calif, residents add b°h tax. 

MICRO SOFTWARE SYSTEMS • MICROPLOT, INC. 

1815 SMOKEWOOD AVE. • FULLERTON, CA 92631 • (714) 526-8435 



rWARI 
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VISA/1 LASTERCARD 
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Curtis electronic surge protectors cost less and offer a lifetime performance warranty while protecting 
your valuable computer hardware and software from dangerous, potentially damaging powerline 
overvoltage transients - "surges, spikes, and glitches" - that can cause instant failure or drastically reduce 
system life. With our specially designed EMI-RFI filters, your system is protected from troublesome 
office equipment, general hash created by small motors, 
fluorescent lamps, and the like. 
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Peterborough. N.H. 03468 
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Each of these precious jewels, will easily blend with the colors 
of any modern office or home surroundings. For safe, trouble- 
free performance, give your computer that jewelers touch. 



ORTI 



Available at all ComputerLands. 
Entre Computer Centers. Inacomp. 
Micro Age. Eczel. or your local 
microcomputer dealer. Over 1000 
locations nationally! In Canada: Micro- 
Computer Products. PC Box 235. Ajax. 
ONT. Canada L1S 3C3. (416) 427-6612 



For the Curiis dealer nearest you 
call (603) 924-7803 
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Unlock 

the versatility 

of your TRS-80 

with these handy utilities. 



Utili-keys 
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Fourteen new commands enhance Level II 
Cassette Basic and use only 1.5K of RAM. 



Basic Plus 



asic Plus, a 
pumped-up ver- 
sion of Level II 
Cassette Basic, 
gives you 14 new 
Basic commands that not only en- 
hance conventional Basic, but operate 
much faster than their Basic counter- 
parts. The Assembly-language pro- 
gram uses only 1.5K of memory and 
runs on a 16K Model III. 

Basic Plus features a utility to re- 
cover accidentally lost programs be- 
cause of a system reset or execution of 
a New command, improved USR and 
Restore commands, and a simple set 
of commands to activate and deacti- 
vate the clock display and to provide a 
measured delay in a program. It also 
provides a command that gives your 
Model III sound capability. 

Other features include multibyte 
PEEK and POKE commands, a com- 
mand that sets memory size without 
requiring a reboot, and a utility that 
removes all unnecessary spaces from 
programs. 

Additionally, these commands ac- 
cept both hexadecimal and decimal 
operands. The program lets you speci- 
fy the starting point of Basic programs 
anywhere in RAM — allowing you to 
use low RAM for Assembly-language 
programs. 

Assembling the Program 

As a whole, Basic Plus is too large 
to fit into a cassette-based assembler 
all at once. To solve this problem, I 
split the program into two pieces, and 
provided the necessary equates to con- 
nect them. I used a method similar to 
Gil Spencer's in the July 1981 issue of 
80 Micro ("Enhance Your Level II 
Basic," p. 202). Assemble the first sec- 
tion of the program (Program Listing 



1) and call it One, then assemble the 
second section and call it Two (Pro- 
gram Listing 2). 

Loading the Program 

Load Basic Plus using Basic's Sys- 
tem command. First, set the memory 
size to 30999. After you load the two 
sections, type in /31000. This activates 
Basic Plus's extra commands. If you 
get an L3 error message when you try 
to use Basic Plus, type in /31000 in the 
System mode to regain control. 

The Commands 

The syntax of these new commands 
is easy once you learn it. You must 
precede each new command with the 
disk command CMD. The program 
activates this command so that you 
can use non-disk systems without get- 
ting an L3 error. Most commands and 
most expressions accept both decimal 
and hexadecimal arguments. 

CMD LOMEM &5O00 indicates 
when the computer should begin stor- 
ing programs in RAM. In this exam- 
ple, storage begins at 5C00 hexadeci- 
mal (hex). The Model III normally 
starts storing programs at 43E9 hex or 
17385 decimal. You can write the ad- 
dress in decimal or as an expression, 
such as CMD LOMEM 25700+ 100. 
The ability to adjust the starting point 
of programs in RAM is useful when 
using Basic disassemblers or machine- 
language programs that load into the 
lower portion of memory. 

CMD HIMEM &7F29 lets you an- 
swer the memory size prompt without 
having to reboot the system. Again, 
you can use either decimal or hexadec- 
imal values. The HIMEM command 
lets you preserve high memory for 
machine-language programs. Always 
enter a CLEAR 50 statement after the 



by Robert Milazzo 

HIMEM command to preserve some 
string space. 

CMD SAVE needs no argument 
and instructs the computer to save the 
program that currently resides in 
memory. You can't destroy programs 
saved in this manner with a New com- 
mand or a system reset. This is helpful 
when you run Basic programs that 
contain machine-language subrou- 
tines. By pressing the reset button to 
regain control when the program locks 
up, you delete the contents of RAM. 
This forces you to CLOAD a copy, if 
you have one. Using the Save com- 
mand lets you retrieve the program. 

CMD RENEW works with the Save 
command. To see how it works, type 
in any short program, then type CMD 
SAVE and press the enter key. Press 
the reset button a few times, and enter 
the Basic New command a few times 
as well. Normally, this wipes out your 
original listing. 

However, with Basic Plus, you can 
type in CMD RENEW followed by 
the Basic List command and retrieve 
your program. The only way to lose a 
program in RAM is to turn off your 
computer. 

While CMD GET &43E9,A,B,C,D 
and similar commands differ from or- 
dinary Basic commands, they are no 
more difficult to use. The Get com- 
mand is equivalent to the Basic state- 



TheKeyBox 

Model m 
16KRAM 
Cassette Basic 
Assembly Language 
Editor/Assembler 



LOAD SO 



80 Micro, November 1984 • 45 



ments PEEK(17385) + PEEK (17386) 
♦256 (43E9 hex is equal to 17385 deci- 
mal). The total is returned in variables 
A, B, C, and D. There is no limit to 
the number of variables into which 
you can put the 2-byte PEEK. As in all 
of the other commands, you can use 
both hexadecimal and decimal con- 
stants. The following example makes 
this command clear. 

10 A = 16526 
20CMDGETA.X.Y 

This short program returns, in the 
X and Y variables, the values stored in 
16526 and 16527 in least significant 
byte/most significant byte format. All 
variables that receive the result of the 
2-byte PEEK are single-precision. 
Otherwise, a function error occurs. 

The only other restriction on the 
Get command is in its first argument. 
Basic Plus expects all of its first argu- 
ments in hexadecimal value to be four 
characters long. Use leading zeros 
whenever necessary. CMD GET &234, 
A is not legal while CMD GET 
&0234.A is— since the first argument 
is a four-character expression. 



CMD DELAY 15 instructs the 
computer to do nothing for a user- 
specified amount of time. It allows on- 
ly decimal constants or expressions, 
and you must limit the range of the ar- 
gument to between zero and 59 sec- 
onds. The command, as shown above, 
causes a 15-second delay. This is con- 
venient whenever you need a timing 
loop in a program (saving you the 
trouble of having to use a For... 
Next loop). 

CMD OPEN doesn't require any 
parameters. It prints the time in hours, 
minutes, and seconds in the right-hand 
corner of the video screen. To set the 
clock, refer to the Model III reference 
manual. 

CMD CLOSE requires no argu- 
ments and works in conjunction with 
the Open command to turn off the 
clock display. 

CMD EX$ A$,B$ exchanges the 
values of pairs of strings. This com- 
mand is useful in sorting programs 
that involve strings. There are no limi- 
tations to the number of exchanges 
possible as long as they are in pairs. 
For example, CMD EX$ E$,B$,H$, 



is illegal because the lonely H$ has no 
string to switch with. 

CMD USR 25000,HL=100,DE = 
3054,BC = 50,A = 255 RETURN X = 
HL, Y = DE looks scary, but this com- 
mand is a great improvement over the 
weak Basic USR command. In fact, it 
is the most powerful Basic command 
I've ever seen and will come in handy 
for those of you who use machine-lan- 
guage subroutines. 

This command lets you pass up to 
1 1 values of a machine-language sub- 
routine. After returning to Basic, the 
subroutine can return up to six values 
in the variables you specify. The Basic 
USR command permits the passing of 
only one value to and from a machine- 
language subroutine. 

To study the command more close- 
ly, make a call to the subroutine at lo- 
cation 25000 decimal — an arbitrary 
number that is either an expression or 
a hexadecimal constant. (Make sure 
that the hexadecimal constants are 
four characters long.) 

The program passes parameters to 
the routine by directly loading the var- 
ious register pairs. The command 
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795F FE52 
7961 CAAA7C 


00450 
00460 


CP 
JP 


*R' 

Z, RENEW 






7964 FEA2 


00470 


CP 


162 






7966 CACF79 


00480 


JP 


2 .OPEN 


7918 


00100 ORG 31000 


7969 C39719 


00490 


JP 


1997K 




00101 jPROGRAM LISTING ONE 


796C FEA5 


00500 TABLE3 


CP 


165 




00102 ; COPYRIGHT 


796E CA767A 


00510 


JP 


Z.PUT 




00103 ; ROBERT MILAZZO 


7971 FEAD 


00520 


CP 


173 




00104 ;3604 LIGHTHOUSE AVE 


7973 CA8C7C 


00530 


JP 


Z.SAVE 




00105 ;LAS VEGAS, NEVADA 89110 


7976 FEA6 


00540 


CP 


166 


7C1B 


00110 SOUND EQU 7C1BH 


7978 CAC079 


00550 


JP 


Z, CLOSE 


7C8C 


00120 SAVE EQU 7C8CH 


797B FEB6 


00560 


CP 


182 


7CAA 


00130 RENEW EQU 7CAAH 


797D CADF7A 


00570 


JP 


Z. DELETE 


7D33 


00140 USR EQU 7D33H 


7980 FECI 


00580 


CP 


193 


7F47 


00150 GET EQU 7F47H 


7982 CA337D 


00590 


JP 


Z.USR 


7918 212179 


00160 LD HL.LOOP1 


7985 C39719 


00600 


JP 


1997H 


791B 227441 


00170 LD (16756) ,HL 


7988 7E 


00610 CHKSPC 


LD 


A, (HL) 


791E C3EF1A 


00180 JP 1AEFH 


7989 FE20 


00620 


CP 


32 


7921 7E 


00190 LOOP1 LD A,(HL) 


798B CO 


00630 


RET 


NZ 


7922 23 


00200 INC HL 


798C 23 


00640 


INC 


HL 


7923 FE20 


00210 CP 32 


798D 18F9 


00650 


JR 


CHKSPC 


7925 28FA 


00220 JR Z.LOOP1 


798F 23 


00660 EXCH 


INC 


HL 


7927 FE4F 


00230 CP '0' 


7990 23 


00670 AGAIN 


INC 


HL 


7929 FA3979 


00240 JP M,TABLE1 


7991 CD8879 


00680 


CALL 


CHKSPC 


792C FEA5 


00250 CP 165 


7994 CD0D26 


00690 


CALL 


260DH 


792E FA5079 


00260 JP M,TABLE2 


7997 D5 


00700 


PUSH 


DE 


7931 FEFA 


00270 CP 250 


7998 23 


00710 


INC 


HL 


7933 FA6C79 


00280 JP H,TABLE3 


7999 CD8879 


00720 


CALL 


CHKSPC 


7936 C39719 


00290 JP 1997H 


799C CD0D26 


00730 


CALL 


260DH 


7939 FE45 


00300 TABLE1 CP 'E' 


799F E5 


00740 


PUSH 


HL 


793B CA8F79 


00310 JP Z.EXCH 


79A0 DDE1 


00750 


POP 


IX 


793E FE44 


00320 CP 'D' 


79A2 El 


00760 


POP 


HL 


7940 CA947B 


00330 JP Z. DELAY 


79A3 0603 


00770 


LD 


B,3 


7943 FE4C 


00340 CP 'L' 


79A5 4E 


007 80 SWAP 


LD 


C,(HL) 


7945 CADE79 


00350 JP Z.LOMEM 


79A6 1A 


00790 


LD 


A,(DE) 


7948 FE48 


00360 CP 'H' 


79A7 77 


00800 


LD 


(HL) .A 


794A CAB37B 


00370 JP Z.HIMEM 


79A8 79 


00810 


LD 


A,C 


794D C39719 


00380 JP 1997H 


79A9 12 


00820 


LD 


(DE) ,A 


7950 FE53 


00390 TABLE2 CP 'S' 


79AA 23 


00830 


INC 


HL 


7952 CA1B7C 


00400 JP Z, SOUND 


79AB 13 


00840 


INC 


DE 


7955 FEA4 


00410 CP 164 


79AC 10F7 


00850 


DJNZ 


SWAP 


7957 CA477F 


00420 JP Z.GET 


79AE DDE5 


00860 


PUSH 


IX 


795A FE90 


00430 CP 144 


79B0 El 


00870 


POP 


HL 


795C CA4C7B 


00440 JP Z.RESTOR 


79B1 CD8879 


00880 


CALL 


CHKSPC 
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loads the HL register pair with the 
value of 100 decimal, the BC register 
pair with 50 decimal, and the accumu- 
lator (the A register) with 255 dec- 
imal — another arbitrary number. The 
routine sets any register pair not as- 
signed a value to zero. 

CMD USR lets you directly load the 
HL, DE, BC, IX, IY, and A registers 
with any value you want. After pass- 
ing all parameters and making a call to 
the machine-language subroutine, the 
first part of CMD USR is complete. 
Unlike the Basic USR command, you 
need not worry about putting the ad- 
dress of the subroutine in locations 
16526 and 16527. 

To return to the Basic program that 
called the subroutine, use a return 
command (RET in Assembly lan- 
guage) as the subroutine's last line. 

Once the computer finds the return 
instruction, it passes control to the sec- 
ond part of the CMD USR command 
(following the return statement in that 
command). You can directly load the 
Z80 register pairs with any variables 
you want here. This is how Basic Plus 
passes parameters back to Basic. 



In the example given, the X variable 
has the value of the DE register pair, 
and the Y variable has the value of the 
HL register pair. You can receive the 
values of the HL, DE, BC, IX, IY, 
and A registers and put them into any 
Basic variable as long as the variable is 
single-precision. If one of the receiving 
variables is not single-precision, you'll 
get an error message. 

The command is flexible with its 
many possible variations. If you don't 
want to receive any values, you can 
pass them using the statement CMD 
USR 25000, HL = &0235. To receive 
values, use CMD USR 25000 RE- 
TURN U = DC. This assigns the Basic 
variable U with the value of the IX 
register pair. Although this command 
simply calls a subroutine with CMD 
USR &01C9, remember you always 
pass values to the subroutine due to 
the fact that any register pair not given 
a value automatically has the value of 
zero before you make the call. 

More Commands 

CMD PUT &3C00, 191 , 191 , 191 , 

191 is a multibyte POKE that lets you 



POKE either decimal or hexadecimal 
values into successive memory loca- 
tions. As written here, the command 
POKEs the values of 191 decimal into 
locations 3C00, 3C01, 3C02, and 
3C03 hexadecimal. 

The following variation of the com- 
mand is also legal: CMD PUT 15360, 
&FF FF FF FF. This variant POKEs 
locations 15360-15363 decimal with 
hexadecimal value FF (255 decimal). 
The only difference between hexadeci- 
mal and decimal is the absence of a 
comma between the hex values. All 
hexadecimal values must be in pairs; 
write 13 in hexadecimal as 0C, not just 
C. Entries not written in pairs produce 
an error message. 

You don't have to put spaces be- 
tween hex constants; I use them only 
for clarity. An expression such as 
CMD PUT &3C000, A,B,C,D,X is le- 
gal as long as the variables A, B, C, D, 
and X are fewer than 256 bytes long. If 
they are larger, an error message 
results. 

This command is useful for doing 
such things as POKEing entire ma- 
chine-language programs into memo- 
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79B4 FE2C 


00890 


CP 


, , 


7A06 FE3A 


01310 


CP 


':• 




79B6 28D8 


00900 


JH 


Z. AGAIN 


7A08 2806 


01320 


JR 


Z, LOEND 




79B8 FE3A 


00910 


CP 


' : ' 


7A0A B7 


01330 


OR 


A 




79BA C8 


00920 


RET 


Z 


7A0B 2803 


01340 


JR 


Z, LOEND 




79BB B7 


00930 


OR 


A 


7A0D C39719 


01350 


JP 


1997H 




79BC C8 


00940 


RET 


Z 


7A10 CD491B 


01360 LOEND 


CALL 


1B49H 




79BD C39719 


00950 


JP 


1997H 


7A13 C3EF1A 


01370 


JP 


1AEFH 




79C0 CD8879 


00960 CLOSE 


CALL 


CHKSPC 


7A16 0602 


01380 HEX4 


LD 


B,2 




79C3 CDA102 


00970 


CALL 


2A1H 


7A18 1802 


01390 


JR 


PROG 




79C6 7E 


00980 


LD 


A, (HL) 


7A1A 0601 


01400 HEX2 


LD 


B,l 




79C7 FE3A 


00990 


CP 


' : ' 


7A1C 114A7A 


01410 PROC 


LD 


DE, HEXMSB 




79C9 C8 


01000 


RET 


Z 


7A1F 23 


01420 PROG1 


INC 


HL 




79CA B7 


01010 


OR 


A 


7A20 CD8879 


01430 


CALL 


CHKSPC 




79CB C8 


01020 


RET 


Z 


7A23 D630 


01440 


SUB 


30H 




79CC C39719 


01030 


JP 


19 97H 


7A25 FE0A 


01450 


CP 


10 




79CF CD8879 


01040 OPEN 


CALL 


CHKSPC 


7A27 3802 


01460 


JR 


C.HEX5 




79D2 CD9802 


01050 


CALL 


29811 


7A29 D607 


01470 


SUB 


7 




79D5 7E 


01060 


LD 


A, (HL) 


7A2B CB27 


01480 HEX5 


SLA 


A 




79D6 FE3A 


01070 


CP 


' : ' 


7A2D CB27 


01490 


SLA 


A 




79D8 C8 


01080 


RET 


Z 


7A2F CB27 


01500 


SLA 


A 




79D9 B7 


01090 


OR 


A 


7A31 CB27 


01510 


SLA 


A 




79DA C8 


01100 


RET 


Z 


7A33 F5 


01520 


PUSH 


AF 




79DB C39719 


01110 


JP 


1997K 


7A34 23 


01530 


INC 


HL 




79DE 23 


01120 LOHEH 


ItiC 


HL 


7A35 CD8879 


01540 


CALL 


CHKSPC 




79DF 23 


01130 


INC 


HL 


7A38 D630 


01550 


SUB 


30H 




79E0 23 


01140 


INC 


HL 


7A3A FE0A 


01560 


CP 


10 




79E1 DO 


01145 


NOP 




7A3C 3802 


01570 


JR 


C.HEX6 




79E2 00 


01146 


NOP 




7A3E D607 


01580 


SUB 


7 




79E3 CD8879 


01150 


CALL 


CHKSPC 


7A40 4F 


01590 HEX6 


LD 


C,A 




79E6 FE26 


01160 


CP 


'&' 


7A41 Fl 


01600 


POP 


AF 




79E8 2009 


01170 


JR 


NZ.LDEC 


7A42 81 


01610 


ADD 


A,C 




79EA CD167A 


01180 


CALL 


HEX4 


7A43 12 


01620 


LD 


(DE) ,A 




79ED ED5B497A 


01190 


LD 


DE, (HEXLSB) 


7A44 IB 


01630 


DEC 


DE 




79F1 1809 


01200 


JR 


PROC 


7A45 10D8 


01640 


DJNZ 


PROG1 




79F3 CD3723 


01210 LDEC 


CALL 


2337H 


7A47 23 


01650 


INC 


HL 




79F6 E5 


01220 


PUSH 


HL 


7A48 C9 


01660 


RET 






79F7 CD4B7A 


01230 


CALL 


BINARY 


7A49 00 


01670 HEXLSB 


DEFB 







7 9FA EB 


01240 


EX 


DE,HL 


7A4A 00 


01680 HEXMSB 


DEFB 







79FB El 


01250 


POP 


HL 


7A4B 3AAF40 


01690 BINARY 


LD 


A, (40AFH) 




79FC ED53A440 


01260 PBOC 


LD 


(16548) ,DE 


7A4E FE02 


01700 


CP 


2 




7A0O IB 


01270 


DEC 


DE 


7A50 2820 


01710 


JR 


Z,INT 




7A01 AF 


01280 


XOR 


A 


7A52 FE03 


01720 


CP 


3 




7A02 12 


01290 


LD 


(DE) ,A 


7A54 CAF80A 


01730 


JP 


Z,0AF8K 




7A03 CD8879 


01300 


CALL 


CHKSPC 


7A57 3A2441 


01740 


LD 


A, (4124H) 
Listing 


continued 
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ry. It's much faster than using For... 
Next loops and data statements. Other 
uses include setting memory to zero 
and whiting-out the screen. 

CMD DELETE is simple to under- 
stand since it requires no returns or 
operands. It simply removes all unnec- 
essary spaces and line feeds from com- 
pleted Basic programs. This sort of 
compression saves memory and tape, 
and speeds up program execution. 

In Level II Basic, the Restore com- 
mand sets the data pointer to the first 
data statements, letting a program use 
the same data again. Although this is 
useful, CMD RESTORE 10,5 gives 
you control of the pointer and allows 
you to set it to the data statement you 
want. 

The first parameter sets the data 
pointer at the beginning of line 10; the 
second parameter sets the data pointer 
to the fifth bit of data in line 10. For 
example: 

10 DATA 1,2,3,4,5,6 
20 CMD RESTORE 10,4 
30 READ A:PRINT A 

This short program prints the num- 



ber 4 on the screen. As with the other 
commands, CMD Restore supports 
expressions. This command doesn't 
permit hexadecimal positions greater 
than 255. CMD RESTORE 100,300 is 
illegal since it specifies a position in 
line 100 that exceeds the limits of the 
command. 

CMD SOUND &0642,191,191,191, 
65 lets your computer emit simple 
sounds through an amplifier hooked 
up to the cassette jack. The Sound 
command's syntax is exactly the same 
as that of CMD Put, except that the 
parameters stand for different things. 

The first parameter follows 
SOUND (in hexadecimal) and repre- 
sents the durations of the subsequent 
four notes. Durations can last from 1 
to 65535, and you can express them 
with either decimal or hexadecimal 
values. Here, too, you can use vari- 
ables as long as they are within the pre- 
scribed range. The higher the numeri- 
cal value of the duration, the longer 
each of the notes plays. 

The next four values decimally rep- 
resent the notes and can range from 
zero to 255. CMD SOUND 275, &3C 



FF AD 08 65 6F is also legal. This 
command has a duration of 275 deci- 
mal and plays the notes 3C, FF, AD, 
08, 65, and 6F hex. 

All hexadecimal notes must be in 
groups of two characters. Variables 
represent either the duration or the 
notes, as long as they don't exceed the 
specified ranges. 

Precautions 

After you use the CMD Renew 
command, run the restored program 
before you do anything else. This fixes 
several of the variable pointer tables 
necessary for the correct operation of 
many other commands. Failure to 
take this required step results in crash- 
es and hang-ups. 

A word of warning: This program is 
unforgiving concerning syntax errors. 
Unlike Level II Basic, the error mes- 
sages are not comprehensive. Go back 
to the rules for answers to persistent 
errors. ■ 

Write to Robert Milazzo at 3604 
Lighthouse Ave., Las Vegas, NV 
89110. 
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7A5A 
7A5C 
7A5E 
7A60 
7A63 
7A66 
7A67 
7A6A 
7A6D 
7A70 
7A71 
7A72 
7A75 
7A76 
7A77 
7A7A 
7A7C 
7A7E 
7A81 
7A85 
7A88 
7A8A 
7A8C 
7A8F 
7A92 
7A93 
7A94 
7A96 
7A99 
7A9C 
7A9D 
7A9F 
7AA0 
7AA1 
7AA4 
7AA6 
7AA8 
7AA9 
7AAC 
7AAF 
7AB2 
7AB3 
7AB6 
7AB8 



FE90 

2805 

3812 

C3B207 

3A2141 

B7 

C2B207 

2A2241 

110080 

19 

C9 

CD7F0A 

C9 

00 

CD8879 

FE26 

2011 

CD167A 

FD2A497A 

CD8879 

FE2C 

2814 

C39719 

CD3723 

E5 

7E 

FE2C 

C29719 

CD4B7A 

E5 

FDEl 

El 

23 

CD8879 

FE26 

2017 

23 

CD8879 

CDE07B 

FD7700 

23 

CD8879 

FE3A 

C8 



01750 

01760 

01770 

01780 

01790 BINAR1 

01800 

01810 

01820 

01830 

01840 

01850 

01860 INT 

01870 

01880 PUT 

01890 

01900 

01910 

01920 

01930 

01940 

01950 

01960 

01970 

01980 PUTDEC 

01990 

02000 

02010 

02020 

02030 

02040 

02050 

02060 

02070 PUT2 

02080 

02090 

02100 

02110 

02120 

02130 PUTSTR 

02140 

02150 

02160 

02170 

02180 



CP 


144 


7AB9 


B7 


02190 


OR 


A 


Jp 


Z.BINAR1 


7ABA 


C8 


02200 


RLT 


Z 


JR 


C,INT 


7ABB 


FD23 


02210 


INC 


IY 


JP 


7B2H 


7ABD 


18ED 


02220 


JR 


PUTSTR 


LD 


A, (4121H) 


7ABF 


CD3723 


0223 PUTNUH 


CALL 


233711 


OR 


A 


7AC2 


E5 


02240 


PUSH 


HL 


JP 


NZ.7B2H 


7AC3 


CD7F0A 


02250 


CALL 


0A7FII 


LD 


HL,(4122H) 


7AC6 


7C 


02260 


LD 


A , H 


LD 


DE, 32768 


7AC7 


B7 


02270 


OR 


A 


ADD 


HL,DE 


7AC8 


C24A1E 


02280 


JP 


NZ.1E4AH 


RET 




7ACB 


FD7500 


02290 


1 D 


(IY+0) .1. 


CALL 


0A7FH 


7ACE 


El 


02300 


POP 


HI. 


RET 




7ACF 


7E 


02310 


LD 


A, (ill.) 


NOP 




7AD0 


FE3A 


02320 


CP 


1 : ' 


CALL 


CHKSPC 


7AD2 


C8 


02330 


RET 


Z 


CP 


' i' 


7AD3 


B7 


02340 


OR 


A 


JR 


NZ. PUTDEC 


7AD4 


C8 


02350 


RLT 


Z 


CALL 


HEX4 


7AD5 


FE2C 


02360 


CP 


' , ' 


LD 


IY, (HEXLSB) 


7AD7 


C29719 


02370 


JP 


NZ. 19971! 


CALL 


CHKSPC 


7ADA 


FD23 


02380 


INC 


IY 


CP 


1 f ■ 


7 ADC 


23 


02390 


INC 


HI, 


JR 


Z.PUT2 


7ADD 


18E0 


02400 


JR 


PUTNUH 


JP 


1997H 


7ADF 


2AF940 


02410 DELETE 


LD 


HL, (16633) 


CALL 


2337H 


7AE2 


ED4BA440 


02420 


LD 


BC# (16548) 


PUSH 


HL 


7AE6 


03 


02430 


IN"C 


BC 


LD 


A,(HL) 


7AE7 


03 


02440 


INC 


BC 


CP 


' f • 


7AE8 


03 


02450 


INC 


BC 


JP 


NZ.1997H 


7AE9 


03 


02460 


INC 


BC 


CALL 


BINARY 


7AEA 


C5 


02470 


PUSH 


BC 


PUSH 


HL 


7AEB 


Dl 


02480 


POP 


DE 


POP 


IY 


7AEC 


B7 


02490 


OR 


A 


POP 


HL 


7AED 


ED42 


02500 


SBC 


HL,BC 


INC 


HL 


7AEF 


E5 


02510 


PUSH 


HL 


CALL 


CHKSPC 


7AF0 


CI 


02520 


POP 


BC 


CP 


' t. ' 


7AF1 


D5 


02530 


PUSH 


DE 


JR 


HZ.PUTNUH 


7AF2 


El 


02540 


POP 


HL 


INC 


HL 


7AF3 


03 


02550 


INC 


BC 


CALL 


CHKSPC 


7AF4 


7E 


02560 DLOOP 


LD 


A,(HL) 


CALL 


HEXSTR 


7AF5 


FE0A 


02570 


CP 


10 


LD 


(IY+0) ,A 


7AF7 


CC407B 


02580 


CALL 


Z,D4 


INC 


HL 


7AFA 


FE20 


02590 


CP 


32 


CALL 


CHKSPC 


7AFC 


CC407B 


02600 


CALL 


Z,D4 


CP 




7AFF 


FE22 


P2610 


CP 


34 


RET 


Z 


7B01 


CC227B 


02620 


CALL 


Z,D1 
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Give The Cleat 
Choice in 

TRS-80 
Magazines 



Give a gift subscription to 80 Micro. Every month 
80 serves as a shopping guide for thousands of TRS-80 
users. They know exactly what they need. And they 
get it. at the right price and from the right place, by 
reading 80 Micro's product reviews, advertising and 
new product announcements. 

80 Micro runs more ads than all its competitors 
combined. With over 30% of 80 readers buying 
through mail order, there's no doubt that more and 
more TRS-80 users are turning to 80 Micro for shop- 
ping advice. 




And of course 80 Micro remains the # 1 information 
source for TRS-80 users. Each issue is packed with col- 
umns for the novice and intermediate user: 

Reviews— in-depth analysis and comparisons of 
TRS-80 products that give 80 readers the inside track 
to sound investments. 

Pulse Train— 80 reports on Tandy and the computer 
industry: product development and improvements, 
marketing strategy, and trade shows. 
New Products— announcements of the latest TRS-80 
products: the specs, sources of supply and price. 
Project 80— for improving applications and the versa- 
tility of the TRS-80 computer. 

Easy to Buy 

This year give 80 Micro to all the TRS-80 users on 
your list. Just send in the coupon now! Or. for faster 
service call toll-free 1-800-258-5473. In New Hampshire, 
dial 1-924-947 1 to give 12 issues of 80 MICRO for 
$24.97. 

TRS-80 is a registered trademark nfRadif Shack a division ofTwi,, 



yifQI This year Til give 80 Micro to 
X .C/O • all the TRS-80 users on my list. 

□ Check/MO CJ MC DAE Z! VISA 
□ Bill me $24.97 for 12 issues 

I'lcaw tn.ik.- chinks piivablr In HO MK'KO 

Card * Exp. Date 



Signature. 

Name 

Address 

City 



.State. 



Zip 



Please enter a 1 year gift subscription to: 

Name 

Add ress 

City 



State 



Zip. 



64NB8 

mada A llodm S87A7, I vearonlv. I IS himl* drawn <m US bank. Foreign »urta.< $-14 97 1 srar unlv. U9 luiiu* 
drawn on t'S bank Foreign airmail ptr.i- mmiKI All gil- mbai ripUm begin with the January l'W5 issue 

CW Communications .Peterborough 
80 Micro • PO Box 981 • Farmingdale, NY 1 1737 
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, 




7B04 FE88 


02630 


CP 


136 


7B87 ED53FF40 


03470 RESTEN 


LD 


(16639) ,DE 




7B06 CC397B 


02640 


CALL 


Z.D3 


7B8B 7E 


03480 


LD 


A, (HL) 




7B09 FE93 


02650 


CP 


147 


7B8C FE3A 


03490 


CP 


1 : • 




7B0B CC397B 


02660 


CALL 


Z.D3 


7B8E C8 


03500 


RET 


Z 




7B0E B7 


02670 


OR 


A 


7B8F B7 


03510 


OR 


A 




7B0F CC2E7B 


02680 


CALL 


Z.D2 


7B90 C8 


03520 


RET 


Z 




7B12 EDA0 


02690 


LDI 




7B91 C39719 


03530 


JP 


1997H 




7B14 EAF47A 


02700 


JP 


PE,DLOOP 


7B94 00 


03540 DELAY 


NOP 






7B17 CDF81A 


02710 


CALL 


1AF8H 


7B95 23 


03550 


INC 


HL 




7B1A 23 


02720 


INC 


HL 


7B96 23 


03560 


INC 


HL 




7B1B 23 


02730 


INC 


HL 


7B97 23 


03570 


INC 


II L 




7B1C 22F940 


02740 


LD 


(16633) ,HL 


7B98 23 


03580 


INC 


II L 




7B1F C3EF1A 


02750 


JP 


1AEFH 


7B99 AF 


03590 


XOR 


A 




7B22 EDAO 


02760 Dl 


LDI 




7B9A 321742 


03600 


LD 


(16919) ,A 




7B24 7E 


02770 


LD 


A,(HL) 


7B9D CD1C2B 


03610 


CALL 


2B1CH 




7B25 B7 


02780 


OR 


A 


7BA0 FE3C 


03620 


CP 


60 




7B26 CA4A1F. 


02790 


JP 


Z.1E4AH 


7BA2 D24A1E 


03630 


JP 


NC,1E4AH 




7B29 FE22 


02800 


CP 


'"■ 


7BA5 47 


03640 


LD 


B,A 




7B2B 20F5 


02810 


JR 


NZ.D1 


7BA6 3A1742 


03650 DELAY 1 


LD 


A, (16919) 




7B2D C9 


0282G 


RET 




7BA9 B8 


03660 


CP 


B 




7U2E EDAO 


02830 D2 


LDI 




7BAA C8 


03670 


RET 


Z 




7B30 EDAO 


02840 


LDI 




7BAB 3A4038 


03680 


LD 


A, (38401!) 




7B32 EDAO 


02850 


LDI 




7BAE FE04 


03690 


CP 


4 




7U34 EDAO 


02860 


LDI 




7BB0 C8 


03700 


RET 


Z 




7B36 E8 


02870 


RET 


PE 


7BB1 18F3 


03710 


JR 


DELAY 1 




7B37 03 


02880 


INC 


BC 


7BB3 23 


03720 HIMEM 


IMC 


HL 




7B3B C9 


02890 


RET 




7BB4 23 


03730 


INC 


HL 




7B39 EDAO 


02900 D3 


I.DI 




7BB5 23 


03740 


INC 


ML 




7B3H 7E 


02910 


LD 


A, (HL) 


7BB6 00 


03745 


NOP 






7B3C 137 


02920 


OR 


A 


7BB7 00 


03746 


NOP 






7B3D 20FA 


0293"0 


JR 


NZ,D3 


7BB8 CD8879 


03750 


CALL 


CHKSPC 




7B3F C9 


02940 


RfcT 




7BBB FE26 


03760 


CP 


'&' 




7H40 23 


02950 D4 


INC 


HL 


7BBD 2016 


03770 


JR 


NZ. HINUH 




7B41 OB 


02960 


DEC 


BC 


7BBF CD167A 


03780 


CALL 


11 EX 4 




7B42 7E 


02970 


LD 


A,(HL) 


7BC2 ED5B497A 


03790 


LD 


DE, (HEXLSB) 




7B43 FE20 


02980 


CP 


32 


7BC6 ED53B140 


03800 HIEND 


LD 


(16561) ,DE 




7B45 2bF9 


02990 


JR 


Z,D4 


7BCA CD8879 


03810 


CALL 


CHKSPC 




7B47 FEOA 


03000 


CP 


10 


7BCD FE3A 


03820 


CP 


' : ' 




7B49 28F5 


03010 


JR 


Z.D4 


7BCF C8 


03830 


RET 


z 




7B4B C9 


03020 


RET 




7BD0 B7 


03840 


OR 


A 




7B4C CD3723 


03030 RESTOR 


CALL 


2337H 


7BD1 C8 


03850 


RET 


Z 




7B4F E5 


03040 


PUSH 


HL 


7BD2 C39719 


03860 


JP 


1997H 




7B50 CD4B7A 


03050 


CALL 


BINARY 


7BD5 CD3723 


03870 HINUH 


CALL 


2337H 




7B53 EB 


03060 


EX 


DE.HL 


7BD8 E5 


03880 


PUSH 


HL 




7E54 CD2C1B 


03070 


CALL 


1B2CH 


7BD9 CD4B7A 


03890 


CALL 


BINARY 




7B57 D24A1E 


03080 


JP 


NC, It: 4 All 


7BDC EB 


03900 


EX 


DE.HL 




7B5A El 


03090 


POP 


HL 


7BDD El 


03910 


POP 


HL 




7B5B OB 


03095 


DEC 


BC 


7BDE 18E6 


03920 


JR 


HIEND 




7B5C C5 


03100 


PUSH 


BC 


7BE0 7E 


03930 HEXSTR 


LD 


A, (HI,) 




7B5D CF 


03110 


RST 


8 


7BE1 D630 


03940 


SUB 


30H 




7B5E 2C 


03120 


DEFB 


• ■ 


7BE3 FEOA 


03950 


CP 


10 




7B5K CD3723 


03130 


CALL 


2337H 


7BE5 3807 


03960 


JR 


C» HEXNUH 




7B62 E5 


03140 


PUSH 


HL 


7BE7 FEU 


03970 


CP 


11H 




7B63 CD7F0A 


03150 


CALL 


0A7FH 


7BE9 DA4A1E 


03980 


JP 


C.1E4AH 




7B66 7C 


03160 


LD 


A,H 


7BEC D607 


03990 


SUB 


7 




7B67 B7 


03170 


OR 


A 


7BEE CB27 


04000 HEXNUH 


SLA 


A 




7B68 C24A1E 


03180 


JP 


NZ.1E4AH 


7BF0 CB27 


04010 


SLA 


A 




7B6B 7D 


03190 


LD 


A, I. 


7BF2 CB27 


04020 


SLA 


A 




7B6C El 


03200 


POP 


HL 


7BF4 CB27 


04030 


SLA 


A 




7B6D Dl 


03210 


POP 


DE 


7BF6 47 


04040 


LD 


B,A 




7B6E B7 


03220 


OR 


A 


7BF7 23 


04050 


INC 


HL 




7B6F 2816 


03230 


J P. 


Z. RESTED 


7BF8 CD8879 


04060 


CALL 


CHKSPC 




7B71 FE01 


03240 


CP 


1 


7BFB B7 


04070 


OR 


A 




7B73 2812 


03250 


JR 


Z.RESTEN 


7BFC CA4A1E 


04080 


JP 


Z.1E4AH 




7B75 3D 


03280 REST1 


DEC 


A 


7BFF FE3A 


04090 


CP 


1 : ' 




7B76 47 


03290 


LD 


B,A 


7C01 CA4A1E 


04100 


JP 


Z.1E4AH 




7B77 13 


03300 


INC 


.DE 


7C04 D630 


04110 


SUB 


30H 




7B78 13 


03310 


INC 


DE 


7C06 FEOA 


04120 


CP 


10 




7B79 13 


03320 


INC 


DE 


7C08 3807 


04130 


JR 


CHEXMU2 




7B7A 13 


03330 


INC 


DE 


7C0A FE11 


04140 


CP 


11H 




7B7B 13 


03400 REST3 


INC 


DE 


7C0C DA4A1E 


04150 


JP 


C1E4A11 




7B7C 1A 


03410 


LD 


A, (DE) 


7C0F D607 


04160 


SUB 


7 




7B7D B7 


03420 


OR 


A 


7C11 80 


04170 HEXNU2 


ADD 


A,B 




7B7E CA4A1E 


03430 


JP 


Z.1E4AH 


7C12 C9 


04180 


RET 






7B81 FE2C 


03440 


CP 


■ ■ 


0000 


04190 


END 






7B83 20F6 


03450 


JR 


NZ.REST3 


00000 Total Errors 








7B85 10F4 


03460 


DJNZ 


REST3 










End 





Program Listing 2. Basic Plus, Part 2. 


79B8 


00160 CHKSPC 


EQU 


798811 






7A16 


00170 HEX4 


EQU 


7A16H 






7A49 


00180 HEXLSB 


EQU 


7A49H 






7A4B 


00190 BINARY 


EQU 


7A4BH 


7C1B 


00100 ORG 7C1BH 


7BE0 


00200 HEXSTR 


EQU 


7BE01I 




00110 .-PROGRAM LISTING 2 


7C1B 23 


00210 SOUND 


INC 


HL 




00120 .-COPYRIGHT 


7C1C 23 


00220 


INC 


HL 




00130 .-ROBERT HILAZZO 


7C1D 23 


00230 


INC 


HL 




00140 ,-3604 LIGHTHOUSE' AVE 


7C1E 23 


00240 


INC 


HL 




00150 ,-LAS VEGAS, NEVADA 89110 


7C1F CD8879 


00250 


CALL 


CHKSPC 

Listing 2 continued 
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NOW the One Person Who Cares Most About \bur 
Computer Can Protect Its Data — 



YOU! 



Introducing . . . Memory Minder from 
)&M Systems 

The most advanced disk drive 
testing program on the market. 

Until recently, only trained technicians using 
special equipment could check your disk drives 
for potential or actual problems. But now, thanks 
to major breakthroughs by J&M Systems, Ltd. 
and Dysan Corporation, YOU can be your own 
computer's technician. 

rVlemory Minder is the most comprehensive disk 
diagnostic program available for microcomputers. 
With Memory Minder, you can periodically test 
disk drives to monitor long-term drift of head 
alignment, index hole timing, spindle speed, 
directional seek, and many other parameters. 
Then, if your head is out of alignment, Memory 
Minder can accurately align it once again. Early 
detection and correction of these problems will 
help protect you against costly data loss and 
down time. 

And with Memory Minder, you don't need a 
technical background to perform these tests. 
Simply follow the easy instructions in the 
manual or on the screen's menu. Now you can 



use state-of-the-art software to care for your 
hardware. 

Memory Minder is currently available for IBM, 
TRS-80, Kaypro and Sanyo systems. Only from 
|&M Systems. Prices start at $79. 



I d like more information on Memory Minder 

Please send me your complete brochures 

Send me nfomnal c r c n od ei Hnc product! 



from l&M Systems 

I have the following computer 

Name 



Address . 



City. 



State 



Zip. 



J fit M SYSTEMS, LTD. 



137 UTAH NE 
ALBUQUERQUE, N.M. 87108 
505/265-1501 ^o, 



.- See List ot Advertisers on Page 1 76 
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7C22 FE26 


00260 


CP 


'4 ' 


7D46 ED53407F 


01220 


LD 


(IYVAL) .DE 








7C24 203C 


00270 


JR 


NZ, SONDEC 


7D4A AF 


01230 


XOK 


A 








7C26 CD167A 


00280 


CALL 


HEX4 


7D4B 32427F 


01240 


LD 


(AVAL) .A 








7C29 00 


00290 


NOP 




7D4E CD8879 


01250 


CALL 


CHKSPC 








7C2A CF 


00300 


RST 


8 


7D51 FE26 


01260 


CP 


'i ' 








7C2B 2C 


00310 


DEFB 


■ , ' 


7D53 200D 


01270 


JR 


NZ, USRNUM 








7C2C ED5B497A 


00320 


LD 


DE, (HEXLSB) 


7D55 CD167A 


01280 


CALL 


HEX4 








7C30 ED538A7C 


00330 


LD 


(DURAT) .DE 


7D58 ED5B497A 


01290 


LD 


DE, (HEXLSB) 








7C34 CD8879 


00340 SONCON 


CALL 


CHKSPC 


7D5C ED531E7E 


01300 


LD 


(USRJUM) ,DE 








7C37 FE26 


00350 


CP 


'i ' 


7D60 180B 


01310 


JR 


TOVAR 








7C39 2816 


00360 


JR 


Z, SONHEX 


7D62 CD3723 


01320 USRNUM 


CALL 


2337H 








7C3B CD3723 


00370 SONNUM 


CALL 


2337H 


7D65 E5 


01330 


PUSH 


HL 








7C3E E5 


00380 


PUSH 


HL 


7D66 CD4B7A 


01340 


CALL 


BINARY 








7C3F CD7F0A 


00390 


CALL 


0A7FH 


7D69 221E7E 


01350 


LD 


(USRJUM) .HL 








7C42 7D 


00400 


LD 


A,L 


7D6C El 


01360 


POP 


II L 








7C43 El 


00410 


POP 


HL 


7D6D CD8H79 


01370 TOVAR 


CALL 


CHKSPC 








7C44 CD717C 


00420 


CALL 


SOUND1 


7D70 FE3A 


01380 


CP 


' : ' 








7C47 7E 


00430 


LD 


A, (HL) 


7D72 CA047E 


01390 


JP 


Z. USREND 








7C48 FE3A 


00440 


CP 


' : ' 


7D75 C7 


01400 


OR 


A 








7C4A C8 


00450 


RET 


Z 


7D76 CA047L 


01410 


JP 


Z. USREND 








7C4B B7 


00460 


OR 


A 


7D79 FE92 


01420 


CP 


146 








7C4C C8 


00470 


RET 


Z 


7D7B CA047E 


01430 


JP 


Z. USREND 








7C4D CF 


00480 


RST 


8 


7D7t. CF 


01440 


RST 


8 








7C4E 2C 


00490 


DEFB 


1 , ' 


7D7F 2C 


01450 


DF.FB 


1 . ■ 








7C4F 18EA 


00500 


JR 


SONNUM 


7D80 CD8879 


01460 


CALL 


CHKSPC 








7C51 23 


00510 SONHEX 


INC 


HL 


7D83 FF.48 


01470 


CP 


'H' 








7C52 CD8879 


00520 


CALL 


CHKSPC 


7D85 2813 


01480 


JR 


Z. USRHL 








7C55 FE3A 


00530 


CP 


1 : ' 


7D87 FE42 


01490 


CP 


'B' 








7C57 C8 


00540 


RET 


Z 


7D89 2827 


01500 


JR 


Z, USRBC 








7C58 B7 


00550 


OR 


A 


7D8B FE44 


01510 


CP 


'D' 








7C59 C8 


00560 


RET 


Z 


7D8D 2817 


01520 


JR 


Z.USRDl 








7C5A CDE07B 


00570 


CALL 


HEXSTR 


7D8P FE41 


81530 


CP 


'A' 








7C5D CD717C 


00580 


CALL 


SOUND1 


7D91 282B 


01540 


J P. 


Z.USRA 








7C60 18EF 


00590 


JR 


SONHEX 


7D93 FE49 


01550 


CP 


•I' 








7C62 CD3723 


00600 SONDEC 


CALL 


2337H 


7D95 2831 


01560 


JH 


Z.USRI 








7C65 E5 


00610 


PUSH 


HL 


7D97 C39719 


01570 


JP 


1997H 








7C66 CD4B7A 


00620 


CALL 


BINARY 


7D9A 2 3 


01580 USRHL 


INC 


HL 








7C69 228A7C 


00630 


LD 


(DURAT) ,HL 


7D9B CF 


01590 


RST 


8 








7C6C El 


00640 


POP 


HL 


7D9C 4C 


01600 


DEFB 


•l' 








7C6D CF 


00650 


RST 


8 


7D9D Ci)E97D 


01610 


CALL 


USRVAL 








7C6E 2C 


00660 


DEFB 


• , ' 


7DA0 ED53387F 


01620 


LD 


(HLVAL) ,DE 








7C6F 18C3 


00670 


JR 


SONCON 


7DA4 18C7 


01630 


JR 


TOVAR 








7C71 4F 


00680 SOUND1 


LD 


C,A 


7DA6 23 


01640 USRDE 


INC 


HL 








7C72 ED5B8A7C 


00690 


LD 


DE, (DURAT) 


7DA7 CF 


01650 


RST 


8 








7C76 47 


00700 SON1 


LD 


B,A 


7DA8 45 


01660 


DEFB 


'E' 








7C77 3E01 


00710 


LD 


A,l 


7DA9 CDE97D 


01670 


CALL 


USRVAL 








7C79 D3FF 


00720 


OUT 


(255) ,A 


7DAC LD533A7F 


01680 


LD 


(DEVAL) ,DE 








7C7B 10FE 


00730 SON2 


DJNZ 


SON 2 


7DB0 18BB 


01690 


JR 


TOVAR 








7C7D 41 


00740 


LD 


B,C 


7DB2 23 


01700 USRBC 


IMC 


HL 








7C7E 3C 


00750 


INC 


A 


7DB3 CF 


01710 


RST 


6 








7C7F D3FF 


00760 


OUT 


(255) ,A 


7DB4 43 


01720 


DEFB 


'C 








7C81 10FE 


00770 SON3 


DJNZ 


SON 3 


7DB5 CDE97D 


01730 


CALL 


USRVAL 








7C83 IB 


00780 


DEC 


DE 


7DB8 ED533C7F 


01740 


LD 


(BCVAL) ,DE 








7C84 7A 


00790 


LD 


A,D 


7DBC 18AF 


01750 


JR 


TOVAR 








7C85 B3 


00800 


OR 


E 


7DBE 23 


01760 USRA 


INC 


HL 








7C86 C8 


00810 


RET 


Z 


7DBF CDE97D 


01770 


CALL 


USRVAL 








7C87 79 


00820 


LD 


A,C 


7DC2 7B 


01780 


LD 


A,E 








7C88 18EC 


00830 


JR 


sota 


7DC3 32427F 


01790 


LD. 


(AVAL) ,A 








7C8A 0000 


00840 DURAT 


DEFW 


0000 


7DC6 18A5 


01800 


JR 


TOVAR 








7C8C E5 


00850 SAVE 


PUSH 


HL 


7DC8 23 


01810 USRI 


INC 


HL 








7C8D 2AA440 


00860 


LD 


HL, ( 16548) 


7DC9 CD8879 


01820 


CALL 


CHKSPC 








7C90 11CB7C 


00870 


LD 


DE, BUFFER 


7DCC FE58 


01830 


CP 


'X' 








7C93 016400 


00880 


LD 


I1C, 100 


7DCE 23 


01840 


INC 


HL 








7C96 EDBO 


00890 


LDIi' 




7DCF 280E 


01650 


JR 


Z.USRX 








7C98 2AF940 


00900 


LD 


HL, (40F9II) 


7DD1 FE59 


01860 


CP 


■ yl 








7C9B 22317D 


00910 


LD 


(SAVEND) ,IIL 


7DD3 C29719 


01870 


JP 


NZ.1997H 








7C9E El 


00920 


POP 


HL 


7DD6 CDE97D 


01880 


CALL 


USRVAL 








7C9F CD8879 


00930 


CALL 


CHKSPC 


7DD9 ED53407F 


01890 


LD 


(IYVAL) .DE 








7CA2 FE3A 


00940 


CP 


' : ' 


7DDD 188E 


01900 


JR 


TOVAR 








7CA4 C8 


00950 


RET 


Z 


7DDF CDE97D 


01910 USRX 


CALL 


USRVAL 








7CA5 B7 


00960 


OR 


A 


7DE2 ED533E7F 


01920 


LD 


(IXVAL) ,DE 








7CA6 C8 


00970 


RLT 


z 


7DE6 C36D7D 


01930 


JP 


TOVAR 








7CA7 C39719 


00980 


JP 


199711 


7DE9 CP 


01940 USRVAL 


RST 


8 








7CAA 23 


00990 RENEW 


INC 


HL 


7DEA D5 


01950 


DEFB 


213 








7CAB 23 


01000 


INC 


HL 


7DEB CD8879 


01960 


CALL 


CHKSPC 








7CAC E5 


01010 


PUSH 


HL 


7DEE FE26 


01970 


CP 


'4' 








7CAD 21CB7C 


01020 


LD 


ML, BUFFER 


7DF0 2008 


01960 


JR 


NZ. USRDEC 








7CB0 ED5BA440 


01030 


LD 


DE, (16548) 


7DF2 CD167A 


01990 


CALL 


HEX4 








7CB4 016400 


01040 


LD 


BC . 10 


7DF5 F.D5B497A 


02000 


LD 


DE, (HEXLSB) 








7CB7 EDB0 


01050 


LDIR 




7DF9 C9 


02010 


RET 










7CB9 2A317D 


01060 


LD 


HL, (SAVEND) 


7DFA CD3723 


02020 USRDEC 


CALL 


2337H 








7CBC 22F940 


01070 


LD 


(40F9II) ,HL 


7DFD E5 


02030 


PUSH 


HL 








7CBF El 


01080 


POP 


HL 


7DFE CD4B7A 


02040 


CALL 


BINARY 








7CC0 CD8879 


01090 


CALL 


CHKSPC 


7E01 EB 


02050 


EX 


DE,HL 








7CC3 FE3A 


01100 


CP 


' : ' 


7E02 El 


02060 


POP 


HL 








7CC5 C8 


01110 


RET 


Z 


7E0 3 C9 


02070 


RFT 










7CC6 B7 


01120 


OR 


A 


7E04 22437F 


02080 USREND 


LD 


(POSIT) ,HL 








7CC7 C8 


01130 


RET 


Z 


7E07 2A387F 


02090 


LD 


HL, (HLVAL) 








7CC8 C39719 


01140 


JP 


1997H 


7L0A ED4B3C7t 


02100 


LD 


BC, (BCVAL) 








0066 


01150 BUFFER 


DEFS 


102 


7E0L ED5B3A7I 


02110 


LD 


DE, (DEVAL) 








7D31 0000 


01160 SAVEND 


DEFW 


0000 


7E12 DD2A3F-7F 


02120 


LD 


IX, (IXVAL) 








7D33 110000 


01170 USR 


LD 


DE,0 


7E16 FD2A407t 


02130 


LD 


IY, ( IYVAL) 








7D36 ED53387F 


01180 


LD 


(HLVAL) .DE 


7E1A 3A427F 


02140 


LD 


A, (AVAL) 








7D3A ED533A7F 


01190 


LD 


(DEVAL) ,DE 


7E1D CD 


02150 


DEFB 


0CDH 








7D3E ED533C7F 


01200 


LD 


(BCVAL) ,DE 


7E1E 00 


02160 USRJUH 


DEFB 











7D42 ED533E7F 


01210 


LD 


(IXVAL) ,DE 


7E1F 00 


02170 


DEFB 




Listing 2 


•onltnued 
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B.T. SPECIALS 




I MODEL 4 SUPER DISK UPGRADE 

IB Controller Board. D/D and D/S 
Ejhtj^H ^j 40/80 • 8" Drives. Sound Board. 
i.^L.^L.^H LflH Nameplate. Switching Power 
Supply. Installation Kit with 
detailed instruction manual 

w 64K MEMORY and button .... #204103 $240 

w 1 28K MEMORY and button . . #204113 $290 

SPECIAL ADD ONS 

RS232 (with kit only) #203232 $60 

RS232 (w/o kit) $85 

DISK DRIVE ADD ONS 

40 Track S/H Drives #200101 $175 

40 Track D/H Thinline Drives . . . #200212 $225 

TRS 80 MODEL I/III/4 SOFTWARE 

• DOSPLUS4a reg.i69.95 #104002 $99.95 

• DOSPLUS3.5lorlll 

W/MTERM REG. 229.00 #103003M $89.95 

• MSCRIPTI/lll/4 REG. 79.95 #104009 $69.95 



(500452) SS/DD 5'.. 
(500455) DS/DD 5' 
(500457) DS/DD 51* 
(500461 )SS/SD 8" 
(500462) SS/DD 8 
(500465) DS/DD 8 


3M DISKET 

Get a great deal on 
3M diskettes are de 
manufactured to giv 
reliable, error-free p 
it's worth remembe 
3M diskettes Avaiia 
standard 8' and 5'» 
formats 



" 
80 Track 


TES 

jreat diskettes! 
signed and 
e you years of 
•erformance If 
ing, it's worth 
ble in all 
diskette 

S23.50/10 
29.50/10 
39.75/10 
25.50/10 
31.75/10 
40.95/10 I 






DISA-PERF PAPER 

$Q4 95 

%J*T REGULAR $45 

Bo»of2550 9'j • 11 Sheets »20Papc 


-^ 


EPSON RIBBON CARTRIDGES 

S^75 ««* SQ95 Black Only ^^ 

*T FX. MX.RX80 & FX. MX. RX 100 ^P 

Avauaoie m Black (500050) Red (500060) ^ 
Blue (500070) Green (500080) and Brown (500090 


?\ 










LET BT. BUILD A SYSTEM 
FOR YOU! 

Bi-Tech 
MULTIPLEXERS 

Bi-Tech 
HARD DISKS 

Add hard disks to your computer 
Add computers to your hard disk 
The best in peripherals for 
Radio Shack computers 

We have the Best 

Software Operating Systems 

to make your MAS-80 

Super Powerful 



tf 



For MODEL l/IH/4 

• DOSPLUS3.5/4a 

• LDOS5.1 

• TRSDOS6 
^ • CPM— Hard Disk 



For MODEL 11/12 

• DP II 

• TRSDOS 11/12 
with Racet HSDS 

• CPM 



BYTCOM 300/1200 BAUD MODEM 



FEATURES 




• Be" 2 1 2 A and 1 03 1 1 3 compatibility 

• Auto answer Auto dial 

• Software disconnect 

• Use' configurable Cutters 

• Integral VOICE DATA transfer switcn 

• Nonvolatile memory storage ot nine 'orTy-digit numbe's 

• Remote boot capability 

• Rediai linking and continuous redialmg until connected 

• Tone puise o» band dialing 

• P-imary 4 secondary dial tone detect 

• Busy no answer no dial tone recognition 



REG.-S49? Special 



S399 



Buy both /x Link and the 
Bytcom 300/ 1 200 Baud Modem for only 

$44900 

L imited time only . Otter iubjeci to change without notice 



/i LINKH 



TRS^MOD€L« COMMUNICATIONS SOFTWARE C Scott McCegg 

FEATURES • 80 Column Display 

• ASCII Transfer 

• X Modem Protocol Transler 

• On Line HELP Displays 
95 • TRS DOS/DOS PIUS CompataWp 

• Large Storage Butler 

• Completely Configurable 
^4 • Auto ariswef host program 
|t f»<» Run youf own software remotely 

• ano* much more 




79 



M una some fhnaer 



B. T. Enterprises Dept. 1-K 
10 Carlough Road 
Bohemia. NY. 11716-2996 

BT Enterprises is a division of 
Bi-Tech Enterprises Inc 



(516) 567-8155 (voice) 
(516) 588-5836 (modem) 
499371 3/Bi-Tech (Telex) 
Orders Only 800-645-1 165 
70007. 1767(MicroNET) 



Dealer Inquiries Welcome 
Prices subject to change 
N.Y.S. Residents add tax 
Add $4 00 shipping & handling 
American Express. Carte Blanche 
Diners Club. MasterCard A Visa 



*- See List of Advertisers on Page 176 
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Listing 2 continued 






















7E20 22387F 


02180 


LD 


(HLVAL) ,HL 


7EDC 23 


03120 


INC 


HL 








7E23 ED533A7F 


02190 


LD 


(DEVAL) ,DE 


7EDD CD8879 


03130 


CALL 


CHKSPC 








7E27 ED433C7F 


02200 


LD 


(BCVAL) ,BC 


7EE0 B7 


03140 


OR 


A 








7E2B DD223E7F 


02210 


LD 


(IXVAL) .IX 


7EE1 C8 


03150 


RET 


Z 








7E2F FD22407F 


02220 


LD 


(IYVAL) ,IY 


7EE2 FE3A 


03160 


CP 


* : ' 








7E33 32427F 


02230 


LD 


(AVAL) .A 


7EE4 C8 


03170 


RET 


z 








7F.36 2A437F 


02240 


LD 


HL, (POSIT) 


7EE5 CF 


03180 


RST 


8 








7E39 7E 


02250 


LD 


A, (HL) 


7EE6 2C 


03190 


DEFB 


i r ' 








7E3A FE3A 


02260 


CP 


' : ' 


7EE7 C3417E 


03200 


JP 


RETVAR 








7E3C C8 


02270 


RET 


Z 


7EEA ED4B3E7F 


03210 XRET 


LD 


BC, (IXVAL) 








7L3D D7 


02280 


OR 


A 


7EEE CDFF7E 


03220 


CALL 


TRANVR 








7E3E C8 


02290 


RET 


Z 


7EF1 23 


03230 


INC 


HL 








7E3F CF 


02300 


RST 


8 


7EF2 CD8879 


03240 


CALL 


CHKSPC 








7E40 92 


02310 


DEFB 


146 


7EF5 B7 


03250 


OR 


A 








7E41 CD8879 


02320 RETVAR 


CALL 


CHKSPC 


7EF6 C8 


03260 


RET 


Z 








7E44 CD0U26 


02330 


CALL 


260DH 


7EF7 FE3A 


03270 


CP 


* : ' 








7E47 3AAF40 


02340 


LD 


A, (40AFH) 


7EF9 C8 


03280 


RET 


Z 








7E4A FE04 


02350 


CP 


4 


7EFA CF 


03290 


RST 


8 








7L4C C24A1E 


02360 


JP 


NZ.1E4AH 


7EFB 2C 


03300 


DEFB 


• t • 








7E4F ED53457F 


02370 


LD 


(VARLOC) ,D 


7EFC C3417E 


03310 


JP 


RETVAR 








7L53 CF 


02380 


RST 


8 


7EFF CB78 


03320 TRANVR 


BIT 


7,B 








7L54 D5 


02390 


DEFB 


213 


7F01 281C 


03330 


JR 


Z, UNDOV 








7E55 CD8879 


02400 


CALL 


CHKSPC 


7F03 CBB8 


03340 


RES 


7,B 








7E58 FL48 


02410 


CP 


'H' 


7F05 3E90 


03350 


LD 


A, 144 








7L5A 2813 


02420 


JK 


Z. HLRET 


7F07 322441 


03360 


LD 


(4124H) ,A 








7L5C FE42 


02430 


CP 


'B' 


7F0A ED432241 


03370 


LD 


(4122H) ,BC 








7E5E 283B 


02440 


JH 


Z. BCRET 


7F0E AF 


03380 


XOR 


A 








7E6Q FE44 


02450 


CP 


'D' 


7F0F 322141 


03390 


LD 


(412111) ,A 








7E62 2821 


02460 


JR 


Z. DERET 


7F12 E5 


03400 


PUSH 


HL 








7E64 FF.49 


02470 


CP 


■I' 


7F13 212141 


03410 


LD 


HL.4121H 








7E66 2860 


02480 


JR 


Z.IRET 


7F16 ED5B457F 


03420 


LD 


DE, (VARLOC) 








7E68 FE41 


02490 


CP 


'A' 


7F1A CD8B7F 


03430 


CALL 


HOVE 








7E6A 2845 


02500 


JR 


Z.ARET 


7F1D El 


03440 


POP 


HL 








7E6C C39719 


02510 


JP 


1997H 


7F1E C9 


03450 


RET 










7E6F 23 


02520 HLRET 


INC 


HL 


7F1F ED432141 


03460 UNDOV 


LD 


(41211!) ,BC 








7E7 CF 


02530 


RST 


8 


7F23 E5 


03470 


PUSH 


HL 








7E71 4C 


02540 


DEFB 


•L' 


7F24 3E02 


03480 


LD 


A, 2 








7E72 ED4B387F 


02550 


LD 


BC, (HLVAL) 


7F26 32AF40 


03490 


LD 


(40AFH) ,A 








7E76 CDFF7E 


02560 


CALL 


TRANVP. 


7F29 CDB10A 


03500 


CALL 


0AB1H 








7E79 CD8879 


02570 


CALL 


CHKSPC 


7F2C 212141 


03510 


LD 


HL, 41 2111 








7E7C B7 


02580 


OR 


A 


7F2F ED5B457F 


03520 


LD 


DE, (VARLOC) 








7E7D C8 


02590 


RET 


Z 


7F33 CD8B7F 


03530 


CALL 


HOVE 








7E7E FE3A 


02600 


CP 


1 : ' 


7F36 El 


03540 


POP 


HL 








7E80 C8 


02610 


RET 


Z 


7F37 C9 


03550 


RET 










7E81 CF 


02620 


RST 


8 


7F38 0000 


03560 HLVAL 


DEFW 


0000 








7L82 2C 


02630 


DEFB 


' , ' 


7F3A 0000 


03570 DEVAL 


DEFW 


0000 








7E83 18BC 


02640 


JR 


RETVAR 


7F3C 0000 


03580 BCVAL 


DEFW 


0000 








7E85 23 


02650 DERET 


INC 


HL 


7F3E 0000 


03590 IXVAL 


DEFW 


0000 








7E86 CF 


02660 


RST 


8 


7F40 0000 


03600 IYVAL 


DEFW 


0000 








7E87 45 


02670 


DEFB 


'E' 


7F42 00 


03610 AVAL 


DEFB 











7E88 ED4B3A7F 


02680 


LD 


BC. (DEVAL) 


7F43 0000 


03620 POSIT 


DEFW 











7E8C CDFF7E 


02690 


CALL 


TRAHVR 


7F45 0000 


03630 VARLOC 


DEFW 











7E8F CD8879 


02700 


CALL 


CHKSPC 


7F47 00 


03640 GET 


NOP 










7E92 B7 


02710 


OR 


A 


7F48 CD8879 


03650 


CALL 


CHKSPC 








7E93 C8 


02720 


RET 


Z 


7F4B FE26 


03660 


CP 


'& ' 








7L94 FE3A 


02730 


CP 


' : ' 


7F4D 2009 


03670 


JR 


NZ, GETDEC 








7E96 C8 


02740 


RET 


Z 


7F4F CD167A 


03680 


CALL 


HEX4 








7E97 CF 


02750 


RST 


8 


7P52 ED5B497A 


03690 


LD 


DE, (HEXLSB) 








7L98 2C 


02760 


DEFB 


1 , ' 


7F56 1809 


03700 


JR 


GET1 








7E99 18A6 


02770 


JR 


RETVAR 


7F58 CD3723 


03710 GETDEC 


CALL 


2337H 








7E9B 23 


02780 BCRET 


INC 


HL 


7F5B E5 


03720 


PUSH 


HL 








7E9C CF 


02790 


RST 


8 


7F5C CD4B7A 


03730 


CALL 


BINARY 








7E9D 43 


02800 


DEFB 


|£l 


7F5F EB 


03740 


EX 


DE.HL 








7E9E ED4B3C7F 


02810 


LD 


BC. (BCVAL) 


7F60 El 


03750 


POP 


11 L 








7EA2 CDFF7E 


02820 


CALL 


TRANVR 


7F61 1A 


03760 GET1 


LD 


A,(DE) 








7EA5 CD8879 


02830 


CALL 


CHKSPC 


7F62 4F 


03770 


LD 


C,A 








7EA8 B7 


02840 


OR 


A 


7F63 13 


03780 


INC 


DE 








7EA9 C8 


02850 


RET 


Z 


7F64 1A 


03790 


LD 


A,(DE) 








7EAA FE3A 


02860 


CP 


* : ' 


7F65 47 


03800 


LD 


B,A 








7EAC CB 


02870 


RET 


Z 


7F66 CF 


03810 GETV 


RST 


8 








7EAD CF 


02880 


RST 


8 


7F67 2C 


03820 


DEFB 


• t • 








7EAE 2C 


02890 


DEFB 


1 , ' 


7F68 CD8879 


03830 


CALL 


CHKSPC 








7EAF 1890 


02900 


JR 


RETVAR 


7F6B C5 


03840 


PUSH 


BC 








7EB1 23 


02910 ARET 


INC 


HL 


7F6C CD0D26 


03850 


CALL 


260DH 








7EB2 3A427F 


02920 


LD 


A, (AVAL) 


7F6F 3AAF40 


03860 


LD 


A, (40AFH) 








7EB5 4F 


02930 


LD 


C,A 


7F72 FE04 


03870 


CP 


4 








7EB6 0600 


02940 


LD 


B,0 


7F74 C24A1K 


03880 


JP 


NZ.1E4AH 








7EB8 CDFF7E 


02950 


CALL 


TRAHVR 


7F7 7 CI 


03890 


POP 


BC 








7EBB CD8879 


02960 


CALL 


CHKSPC 


7F78 ED53457F 


03900 


LD 


(VARLOC) ,DE 








7EBE B7 


02970 


OR 


A 


7F7C C5 


03910 


PUSH 


BC 








7EBF C8 


02980 


RET 


Z 


7F7D CDFF7E 


03920 


CALL 


TRANVR 








7EC0 FE3A 


02990 


CP 


' : ' 


7F80 CI 


03930 


POP 


BC 








7EC2 C8 


03000 


RET 


Z 


7F81 CD8879 


03940 


CALL 


CHKSPC 








7 EC 3 CF 


03010 


RST 


8 


7F84 FE3A 


03950 


CP 


■ : ' 








7EC4 2C 


03020 


DEFB 


' , ' 


7F86 C8 


03960 


RET 


Z 








7EC5 C3417E 


03030 


JP 


RETVAR 


7F87 B7 


03970 


OR 


A 








7EC8 23 


03040 IRET 


INC 


HL 


7F88 C8 


03980 


RET 


Z 








7EC9 CD8879 


03050 


CALL 


CHKSPC 


7F89 18DB 


03990 


JR 


GETV 








7ECC FES8 


03060 


CP 


'X' 


7F8B 010400 


04000 HOVE 


LD 


BC,4 








7ECE 281A 


03070 


JR 


Z.XRET 


7F8E EDBO 


04010 


LDIR 










7ED0 FE59 


03080 


CP 


lyl 


7F90 C9 


04020 


RET 










7ED2 C29719 


03090 


JP 


NZ,1997H 


0000 


04030 


END 










7ED5 ED4B407F 03100 


LD 


BC,( IYVAL) 


00000 Total Errors 












7ED9 CDFF7E 


03110 


CALL 


TRANVR 










End 









54 • 80 Micro, November 1984 



GREAT PRICES, GREAT SUPPORT, GREAT SELECTION 
from THE source for TRS-80 programs, JMG SOFTWARE. 




We specialize in TRS-80 Model l/MI/4 Software only, so you know that we'll try very hard to keep you 
satisfied. We have a selection of hundreds of programs, and the list is growing every day. As well, we 
provide after-sale support, and also the best prices around. Period. If you find a better price on something 
we sell, we'll beat it. Plus we guarantee satisfaction on the items we sell, and our satisfaction rate of 
over 99% speaks for itself. If there is some reason why you haven't ordered from us, tell us and we'll 
try to correct it; otherwise, you can't lose when you have a great selection, the best support and the 
best prices on your side! 



APPLICATIONS 

Program Name (List) JMG 

LESCRIPT (129.95) $ 99.50 

LESCRIPT CP/M (199.95) 145.50 

TALLYMASTER ( 79.95) 54.50 

DOSPLUS 3.5 ( 99.95) 84.50 

DOSPLUS IVa w/MZal (169.95) 129.50 

ELECTRIC WEBSTER (149.95) 118.50 

E.W. GRAMMAR Option (49.95) 38.50 

LAZYWRITER (175.00) 139.50 

DOTWRfTER w/LDS ( 99.95) 74.50 

POWERMAIL PLUS. (150.00) 119.50 

ZORLOF II ( 69.95) 49.50 



Also, coming soon, the "ALLWRITE" word 
processor, and much more. 

Call or write for more information on 
any of these products, and many others not 
shown here. 



UTILITIES 



EDAS / PRO-CREATE $ 84.50 

DSMBLR III / PRODUCE 34.50 

EDAS / OSM BLR Combo 114.50 



39.50 
24.50 
34.50 
39.50 
39.50 
39.50 
34.50 
64.50 
34.50 
59.50 

And hot off the presses, the Model 4 version of the popular 
TASMON program at $29.50. Also, call for availability of the new 
SUPER UTILITY 4/4P. at $69.50, and much more. 



ALE (Assembly Language Editor) 

TASMON Monitor 

CMDFILE 2/ PROCESS 

TOOLBOX for LDOS 

MODEL 4 TOOLBELT 

6.0 PLUS Enhancements .... 
IMPAKT Basic Enhancement 

MTERM Smart Terminal 

AUTOLOADER 

SUPER UTILITY PLUS 



WRITE FOR OUR 
FREE CATALOG! 



OUR PRICE 
GUARANTEE 



SPECIAL- , hM 

pubHsned a Spec«i »«» ^ proqrir nmets 

US 'Journal ,no ■* % 500) 

(journal onty 



GAMES TOP TEN 

1. SUPREME RULER PLUS $26.50 

2. Subloglc FLIGHT SIMULATOR 29.50 

3. Infocom's ZORK II 38.50 

4. PLANETFALL (New Price) . 34.50 

5. SUSPENDED 42.50 

6. BATTLE OF ZEIGHTY 8.50 

7. WITNESS 34.50 

8. WEERD 9.50 

9. DEADLINE 42.50 

10. Forest Fire Dispatcher 26.50 



NOTES: • The "Games TOP-TEN" is taken from the actual 
unit sales of the above programs over a 5-week period en- 
ding in August. • Note the new prices for the Infocom line. 
• If you haven't yet tried an Infocom game, an excellent first 
choice is PLANETFALL. now reduced in price to $34.50. • 
Call or write for more information on these and many other 
fine programs we sell. 



We will beat any legitimate price advertised for any 
product that we carry. If you find a lower price 
advertised, our price will be $1.00 less, under the 
same conditions (eg. same shipping and other 
charges, etc). To receive the lower price you must 
mention the location of the other ad when ordering. 



TO ORDER: 

We accept orders by phone or mail. When ordering please 
specify the Model of TRS-80 you own, the exact program(s) 
wanted, and the method of payment. We accept Check, 
Money Order, VISA, MasterCard, and Gold. Please enclose 
$2.50 for shipping costs. For Electric Webster and Dotwriter, 
please mention your word processor and printer brands. 



"TOLL FREE" ORDER LINE: 
(416) 389-6086 

Instead of a regular toll free number, we deduct $2.00 from 
your order to pay for your phone charge (which is usually less 
than $2). That way you come out ahead, we come out ahead, 
and everyone is happy. And if you order by mail, ask for our 
"Toll Free Discount" and deduct $2.00! 

(Phones are stalled 10 A.M. lo 7 P.M.. Monday to Saturday, except Wednesdayi 



OUR GUARANTEE 

We sell only top-quality software. If, 
however, you are unsatisfied with a product 
you have purchased from JMG, you may 
return it (in good condition) within 10 days 
for a refund, less a $2.50 handling charge 
for programs under $50 ($5.00 for programs 
over $50). We also ask that you send us a 
letter stating the reason for your return. 



J%T. 






THE FINE PRINT: 

Shipping Charges are $2.50 in Canada and U.S. 
Overseas surface shipping is $5.00, $10 for air 
mail. All prices in U.S. Funds. Add $1.50 for COD 
Charges. Model III programs will all run on a 
Model 4 in III mode. 



3235 LOCKPORT ROAD 
NIAGARA FALLS, NY 14305 

OR 

710 UPPER JAMES ST. 

HAMILTON, ONTARIO 

CANADA L9C 2Z8 

Phone: (416) 389-6086 





y Finder utility 
does for Basic 
programs what 
a word proces- 
sor does for text; 
it makes manipulating lines and 
strings easier and faster. 

Finder provides 11 commands that 
let you locate specific strings within a 
Basic program; edit the line last dis- 
played; copy, move, or replace a line; 
and, under most circumstances, re- 
store all but the first few lines of a pro- 
gram accidentally erased from memory 
by the New command (see the Table). 
When you run Finder from Basic, 
you'll have full access to both Basic 
and Finder commands. The dollar 
sign prompt ($) reminds you when 
you're under Finder's control. It's im- 
portant to remember to exit Finder be- 
fore actually running the program on 
which you're working. 

The Commands 

You should add a period after all 
Finder commands to delimit their area 
of operation. The Find String com- 
mand, F, locates any string within the 
text of a Basic program. You must in- 
clude a period after F to search for a 
specified string from the beginning of 
a program; without the period, the 
statement searches for the string start- 
ing at the most recently displayed line. 

When Finder finishes its search, it 
displays an "End of Text" message, 
along with the number of matches 
found. Finder accepts a maximum 
string length of 31 characters; it trun- 
cates any string that exceeds this limit. 

The second command, X, builds a 
cross-referenced table displaying the 
number of each line with a string that 
matches one you specify. This routine 



Facilitate Basic program maintenance with these 
1 1 commands — they let you manipulate program 
strings and lines and recover programs 
erased by the New command. 



Basic Changes 



sets a flag for the Find String com- 
mand, forcing it to print out only the 
line numbers. Control of the keyboard 
isn't returned to you until after X 
searches the entire program. 

The Edit command (E) lets you edit 
the line last displayed by the Find 
String command. A special buffer 
saved for the E command points to the 
line containing the most recent match. 
The buffer lets you list any line of the 
text to edit with Finder's E command. 

For example, suppose you delete all 
the remarks in your program, includ- 
ing one in line 1500. You have several 
GOSUB 1500 statements left in your 
program. To find and change them, 
first type in LIST 1500- to get to the 
first line after line 1500 in the pro- 
gram. Now you can use F.GOSUB 
1500 to display the string where GO- 
SUB 1500 first occurs. The E com- 
mand lets you edit the line using 
Basic's line editor. Repeat the F and E 
commands until you've made all the 
necessary changes. 

The next command, R, lets you re- 
place one line with another. For exam- 
ple, R. 100. 150 replaces line 150 with 
an exact copy of line 100. For this to 
work, the program must contain an 
unaltered source line and you must 
specify a valid target line number. 

The Copy command, C, copies an 
existing line to the desired destination. 
For example, C. 100. 150 copies line 
100, which must exist, to line 150, 
which must not exist. 

The Move command, M, moves 
a line from its present position to a 
new one. For example, M. 100. 150 
moves line 100 to line 150, overwriting 
the old line 150 or creating a new line. 
Finder deletes line 100 after it com- 
pletes the move. 

The L command prints the current 



by Raymond Boggs 

line number, revealing the line to 
which the Finder buffer points. This is 
particularly useful when editing, as it 
tells you where you last left off. 

The S command tells you the string 
for which you're currently searching, 
while the N command gives you the 
number of matches found thus far. 
Note that Finder resets the match 
counter after it locates the last match. 

The Unnew command, U, restores 
a program that you erased with Basic's 
New command. Use the U command 
immediately after your mistake, as 
any program lines entered subsequent- 
ly prevent Unnew from working. The 
U command is most effective if you 
start your program with a remark line 
full of asterisks. 

Unnew can save all but the first 15 
bytes of your program, part of which 
are line numbers and the linked list 
pointers that Basic uses. Before run- 
ning your program, remember to save 
it under a different file name, restore 
the REM line of asterisks, and load it 
into memory. If you've made Finder 
part of your operating system with the 
SYSGEN command, Unnew should 
work even if you're not using Finder 
at that particular time. One warn- 
ing — if your computer starts to make 
wild disk accesses, immediately press 
the orange reset button. 

The final command, Q, takes you 
out of Finder and back into Basic. 



The Key Box 



IQAPBO 



Model 4 

64KRAM 

Disk Bask 01.00.00 or 01.01.00 

Assembly Language 

Editor/ Assembler optional 
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Using Finder 

I developed Finder with Radio 
Shack's Series I Editor/ Assembler in 
Model III mode because no Model 4 
editor/assemblers were available at 
the time. As a result, I've included 
three sets of instructions: The first set 
is for those of you using the Model III 
editor/assembler, the second set is for 
Model 4 editor/assemblers, and the fi- 
nal set applies to data statements that 
you can POKE in from Basic rather 
than using an editor/assembler. 

For Series I Editor/Assemblers 

Type in Program Listing 1 , entering 
only the equates that apply to your 
version of Basic. Then type in A 
FIND,NL,NS to assemble the pro- 
gram to disk. 

At TRSDOS Ready, type in 
CLEAR. Type in LOAD FIND/CMD 
to load the program into memory. 
Remove the Model III EDTASM disk 
and insert the proper TRSDOS 6.X.X 
system disk in drive zero. 

While holding down the clear key, 
press and quickly release the reset but- 
ton until you see the TRSDOS Ready 
prompt. This overrides anything that 
you've included in your system with 
the SYSGEN command. 

At TRSDOS Ready, type in: 

DUMP FIND/CMD:0 (START = X'FBCO*, 
END = X'FFFF.TRA - X'FBCO") 

Then type in MEMORY (HIGH = X' 
FBBF'). This prevents any machine- 
language modules from overwriting 
Finder and makes it a permanent part 
of your operating system. Reestablish 
any filtering, linkage, or routing and 
type in SYSGEN. 

For Model 4 Editor/Assemblers 

Enter Program Listing 1 with only 
those equates that apply to your ver- 
sion of Basic. Assemble the program 
to disk. While holding down the clear 
key, press the reset button, overriding 
anything that you might have incorpo- 
rated into your system with SYSGEN. 

Type in MEMORY (CLEAR), then 
MEMORY (HIGH = X'FBBF). Type 
in LOAD FIND/CMD. Reestablish 
any filtering, linkage, or routing and 
type in SYSGEN. 

For Basic Data Statements 

Boot up your system (TRSDOS 

f\ V Y\ anH fw»t intr» Racir> Pntpr Prr». 



gram Listing 2 (for Basic 01.00.00) or 
Program Listing 3 (for Basic 01.01.00) 
as appropriate. 

Type in SAVE "FIND/BAS". 
While holding down the clear key, 
press the reset button. This overrides 
anything that you added to your sys- 
tem with SYSGEN. 

Type in MEMORY (CLEAR). Type 
in MEMORY (HIGH = X'FBBF). 
Type in BASIC FIND/BAS. At the 
Basic Ready prompt, type in SYS- 
TEM. Reestablish all linkage, filter- 
ing, or routing and type in SYSGEN. 
Then type in: 

DUMP FIND/CMD:0 (START = X'FBCO 1 , 
END - X'FFFF.TRA = X'FBCO*) 

Finder is now a permanent memo- 
ry-resident program (as long as you 
don't hold the clear key down when 



booting up). If you use this system 
disk when developing Basic programs, 
you'll always have access to Finder. 

To transfer Finder to other system 
disks, copy Finder to the intended disk 
and boot it up. Follow all but the first 
two steps outlined in the instructions 
for other editor/assemblers. You can 
remove Finder from any disk, but be 
sure to keep an extra copy on a sepa- 
rate disk for security. 

To run Finder, from Basic type in 
SYSTEM "RUN FIND". If you've 
removed Find/CMD from your sys- 
tem disk, type in FIND = &HFBC0 to 
define the entry point to Finder. Then 
type in CALL FIND to use the pro- 
gram.! 

Contact Raymond C. Boggs at 4735 
Feigley Road S.W., Port Orchard, 
WA 98366. 



Command 


Definition 


F string 


Finds string in Basic program. 


X string 


Builds cross-reference table. 


E 


Edits line most recently 




displayed by F command. 


R .source, destination 


Replaces source line number to 




destination line number. 


C source, destination 


Copies source line number to 




destination line number. 


M source, destination 


Moves source line number to 




destination line number. 


L 


Prints current line number. 


s 


Prints current search string. 


N 


Prints number of matches found. 


U 


Restores erased program. 


Q 


Quits Finder. 


Table. Finder's commands. 



00100 




Program Listing J. Source code for Finder. 








00110 


;** NOTE: 


TWO SETS OF ADDRESSES ARE PROVIDED BELOW. ** 


00120 


" ** 




THE PROPER SET TO USE DEPENDS ON THE ** 


00130 


. ** 




VERSION OF BASIC ON YOUR COMPUTER. ** 


00140 


. *• 




USE THE 1st SET WITH BASIC 01.00.00. ** 


00150 


. ** 




USE THE 2nd SET WITH BASIC 01.01.00. ** 


00160 


. *# 




BE SURE TO LEAVE OUT OR COMMENT OUT THE ** 


00170 
00180 
00190 
00200 
00210 


;** 




SET THAT DOESN'T APPLY TO YOUR VERSION. ** 








;** THESE ADDRESSES FOR USE WITH BASIC 01.00.00 ONLY. ** 








00220 


* START BLOCK COMMENT OF UNUSED ADDRESSES BELOW. ** 


00230 


ASCBIN 


EQU 


6A69H ; CONVERT ASCII TO BINARY 


00240 


BINASC 


EQU 


3139H ;BINARY TO ASCII t PRINT 


00250 


EDIT 


EQU 


3D2BH ; BASIC LINE EDIT ROUTINE 


00260 


EXPAND 


EQU 


76 9AH ; BASIC LIN EXPAND ROUTINE 


00270 


EXPANl 


EQU 


769DH ;SAME AS EXPAND, EXCEPT.. 


00280 






;USER DEFINES BUFFR IN BC 


00290 


KBLINE 


EQU 


7CEFH /KEYBOARD INPUT ROUTINE 


00300 


PSTSRC 


EQU 


6564H ;PST SEARCH ROUTINE 


00310 


READY 


EQU 


63DDH ;1ST BASIC 'READY' ADDRES 


00320 


READY1 


EQU 


63F8H ;2ND BASIC 'READY' ADDRES 


00330 


VDLINE 


EQU 


76 91H ; PRINT LINE TERMINATED... 

Listing 1 continued 
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Scripsif or ^ 
^SuperScripsit" 

USQrS •■> — ^cc 

Now you can use that fabulous word 
processor from Radio Shack with 
your non-Tandy printer! No point in 
missing out! Your printer CAN work 
great with SuperScripsiH 



PowerDRIVER 



These printers are fully supporte 



EPSON MX-80/100 Series 
EPSON FX/RX 80/100 Series 
Most all EPSON "compatibles." 
C.ltoh 8510 Prowriter 
C.ltoh Starwriter Daisy Wheel 
C.ltoh A10-20 Daisy Wheel 
Okidata 92/93 Dot Matrix 



Model 4 Now Supported! 

Ail features of SuperScripsit" are sup- 
ported to the fullest capabilities 
printer involved Drivers are easy to install. 
easv to use ana • '• ands 10 

learn 1 

PowerDRIVER Only $29.95 each 

PLEASE SPECIFY PRINTER TYPE 



s 



PowerSCRIPT 



A HIGH-POWER modification 
for Scnpsit" from Radio Shack" 

Give Scnpsit" Full Power" PowerSCRIPT 
is a modification for the original Scnpsit/ LC" 
which allows it to work on Model I or III 
nves it the power of many of the 
newer expensive word processors Define 
printer codes tor ANY printer Embed print 
er codes in the middle of a line 1 Alphabe- 
tized directories! User definable printer 
filters 1 User-defmable HELP-FILE' Cham 
files together at print time from any pari of 
the text Logical EXIT to DOS. optional 
automatic line-feed after C/R. FETCH, 
CHAIN and KILL command and more 1 
Compatible with most maior DOS's Simply 
use the enclosed INSTALL program, and 
you will be up and running :n NO TIME 1 
Includes full documentation Get lots of 
new features for a very small price 1 



PowerSCRIPT 



0nlyS39.95 



• 



'RODUCTSFROM HRFP7E QSD I 

_ i ' 500 Slemmons Fwy 
■™ Suite 1 25 

HHI Dallas. Te.as 75229 
(2141484 2976 

Scnpsit anr! SupcScnosit 




Listing 1 continued 












00340 
00350 
00360 






COMMUNICATIONS 
5FB5H 


;WITH BYTE OF 00H. 




BASBUF 


EQU 


; ADDRESS OF EXPANDED LINE 




00370 


BASEND 


EQU 


611BH 


;END OF BASIC PROGRAM PTR 




00380 


BASTRT 


EQU 


5E1BH 


; START ADDRESS OF PROGRAM 




00390 


BINBUF 


EQU 


627CH 


; BINASC CONVERSION BUFFER 




00400 


NOLINE 


EQU 


5B77H 


;NO SUCH LINE MESSAGE ADR 




00410 


AUTOLIN 


EQU 


6104H 


; CURRENT 'AUTO' LINE • 




00420 


AUtOPLG 


EQU 


6103H 


;AUT0 INCREMENT FLAG 




00430 


AUTOINC 


EQU 


6106H 


;AUTO LINE INCREMENT 




00440 


;*** ADDRESSES TO CHANGE TO 


TAKE CONTROL FROM BASIC *** 




00450 


JUHP1 


EQU 


6420H 






00460 


JUMP2 


EQU 


644EH 






00470 
00480 
00490 


OLDJMP 


EQU 


7CEFH 


;WHAT WAS IN THOSE AREAS 




NUM 


EQU 


7FH 


; CONSTANT FOR UNNEW 




00500 
00510 
00520 


* END BLOCK 


COMMENT. 


*• 












00530 
00540 
00550 


;** THESE ADDRESSES POR USE 


WITH BASIC 01.01.00 ONLY. ** 




ASCBIN 


EQU 


5PB9H 


; CONVERT ASCII TO BINARY 




00560 


BINASC 


EQU 


3139H 


/BINARY TO ASCII & PRINT 




00570 


EDIT 


EOU 


3D2BH 


; BASIC LINE EDIT ROUTINE 




00580 


EXPAND 


EQU 


7A0DH 


; BASIC LIN EXPAND ROUTINE 




00590 


EXPAN1 


EQU 


7A10H 


;SAME AS EXPAND, EXCEPT.. 




00600 








;USER DEFINES BUFFR IN BC 




00610 


KBLINE 


EQU 


7E1BH 


; KEYBOARD INPUT ROUTINE 




10620 


PSTSRC 


EQU 


5AB4H 


,-PST SEARCH ROUTINE 




00630 


READY 


EQU 


5920H 


j 1ST BASIC 'READY 1 ADDRES 




00640 


READY1 


EQU 


593BH 


;2ND BASIC 'READY' ADDRES 




00650 


VDLINE 


EQU 


7A04H 


1 PRINT LINE TERMINATED... 




00660 








;WITH BYTE OF 00H. 




00670 


. ****** 


**** 


COMMUNICATIONS 






006 80 


BASBUF 


EQU 


7039H 


; ADDRESS OF EXPANDED LINE 




006 90 


BASEND 


EQU 


719FH 


;END OF BASIC PROGRAM PTR 




00700 


BASTRT 


EQU 


6E9EH 


; START ADDRESS OF PROGRAM 




00710 


BINBUF 


EQU 


72FFH 


(BINASC CONVERSION BUFFER 




00720 


NOLINE 


EQU 


6BE8H 


;NO SUCH LINE MESSAGE ADR 




00730 


AUxOLIN 


EQU 


7188H 


(CURRENT 'AUTO' LINE 1 




00740 


AUTOFLG 


EQU 


7187H 


;AUT0 INCREMENT FLAG 




00750 


AUTOINC 


EQU 


718AH 


(AUTO LINE INCREMENT 




00760 


;*** ADDRESSES TO CHANGE TO TAKE CONTROL FROM BASIC *** 




00770 


JUMP1 


EQU 


5963H 






00780 


JUMP2 


EQU 


5991H 






00790 


OLDJMP 


EQU 


7E1BH 


;WHAT WAS IN THOSE AREAS 




00800 


. ****** 




I******************************************** 




00810 


NUM 


EQU 


80H 


.•CONSTANT FOR UNNEW 




00820 












00830 










00840 


START 


EQU 


0FBC0H 






00850 


j ******************************************************** 




00860 










00870 


. ****** 


a************************************************* 




00880 




PSECT START 






00890 


.** INITIALIZATION ROUTINE 


TO TAKE CONTROL FROM BASIC ** 




00900 


INlZ 


LD 


HL, ENTRY 


;MUST CHANGE BASIC... 




00910 




LD 


(JUMP1) ,HL 


; 'READY' JUMP ADDRESS... 




00920 




LD 


(JUMP2) ,HL 


;TO GAIN CONTROL. 




00930 




JP 


READY 


jGOTO BASIC 'READY'. 




00940 


ENTRY 


LD 


A. (MFLAG) 


(TEST MOVE FLAG 




00950 




CP 


0FFH 


(IF SET, GO FINISH... 




00960 




JP 


Z , MOV3 


(MOVING LINE. 




00970 




LD 


A. (XREFLG) 


j TEST 'XREF' FLAG 




00980 




CP 


0FFH 


;IF SET, CONTINUE... 




00990 




JP 


Z,REFIND 


(SEARCHING PROGRAM. 




01000 


. ****** 


***** 


********************************************* 




01010 


;** TEST FOR AUTO LINE INCREMENT IN COMMUNICATIONS ** 




01020 


;** REGION. 


IF AUTO LINE 


INCREMENT IS ANYTHING OTHER ** 




01030 


;** THAN ZERO, RETURN CONTROL TO BASIC IMMEDIATELY. ** 




01040 












01050 




LD 


A. (AUTOFLG) 


(GET AUTO INC FLAG 




01060 




OR 


A 


(TEST FOR ZERO 




01070 




JR 


NZ,ENTRY1 


(NO PROMPT IF AUTO ON 




01080 




LD 


HL, PROMPT 


(PRINT A '5' PROMPT TO... 




01090 




CALL 


VDLINE 


(REMIND USER THAT HE IS.. 




01100 








(UNDER CONTROL OF 'FIND'. 




01110 


ENTRY1 


CALL 


KBLINE 


;GO FETCH RUNSTRING. 




01120 




RET 


C 


;'. BREAK > KEY HIT 




01130 




LD 


A.B 


(GET RUNSTRING LENGTH... 




01140 




LD 


(TLENTH) ,A 


(SAVE RUNSTRING LENGTH... 




01150 








;IN CASE OF NEW STRING. 




01160 




EX 


AF,AF' 


(MUST SAVE FLAGS AND... 




01170 




EXX 




(REGISTERS FOR BASIC. 




01180 




LD 


DE. (BASBUF) 


(FETCH COMMAND CHAR'S. 




01190 




RES 


5,E 


(FORCE TO UPPERCASE 




01200 




LD 


HL,CMDTBL 


(POINT HL TO COMMAND TBL 




01210 
01220 




LD 


BC,18H 


;t COMMANDS x 2 (254 MAX) 






01230 


CMDINT 


LD 


A,E 


(GET 1st CHAR OF COMMAND 




01240 




CPI 




(TEST AGAINST TABLE 




01250 




JR 


NZ,CMDIN1 


(IF NOT MATCH, TEST... 




01260 




LD 


A.D 


(NEXT COMMAND, ELSE... 




01270 




CPI 




(TEST FOR DELIMITER. 




01280 




JR 


Z,XEQCMD 


j IF DELIMITER, EXECUTE 




01290 




JP 


PO.BASIC3 


(RET TO BASIC IF BC-0,... 












Listing 1 continued 
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OUR PLUS IS MAKING 
ADVANCED TELECOMMUNICATIONS 

SIMPLE. 



Convenience is the key to POST PLUS software. 

Now you can add the most sophisticated tele- 
communications capabilities to your TRS-80 and 
CPAT-80 based systems. With Post Plus software you can 
do it more simply than ever. 

The Plus is one-step accessibility. 
You'll have more one-key access to electronic mail 
and information services than any other telecommuni- 
cations program. The program will even empty your 
mailbox at the touch of a button. 

Write and send easily — another Plus. 
Post Plus combines word processing and telecom- 
munications tor all-in-one convenience. 

The Plus is lower telephone and connect charges. 
Retrieve and file - even print — data as fast as your 
computer and modem can handle. So you can spend 
less time. And less money. 

The Plus is a chance to explore — FREE! 

Your Post Plus software package includes over 
$500 worth of free subscriptions, passwords and on-line 
time to many popular electronic mail and information 
services including Western Union EasvLink,'"' MCI Mail, 
GTE Telemail. •' THE SOURCE.'-' CompuServe, OAG: 
Dow Jones News/Retrieval", DIALOG'S Knowledge 
Index?" VU/Text, Delphi!" Ml/Net and more. 

The Plus is multi-modem compatibility. 

Post Plus works with all popular modems. A 
clear, comprehensive Help feature is one more Plus. 



Plus — it's yours when vou call 

800-MCTEL84 

In Pennsylvania call 215/668-0983. Post Plus 
is a product of MCTel, Inc., Bala Cynwyd, PA. Dealer 
inquiries invited. 



POSTPL 



Makes advanced telecommunications simple. 






Dept.2231 

Three Bala Pl«ua East, Suite SOS, Bala Cynwyd, PA 19004 

The Plu -line Posi Pklt packages with liiKumcrv 

and. foi the miroduc toi - ■ • 

•hipping and handling PA and CA residents pfeaae add (ales tax I $160 
after November V 19841 

Name 



Company 


Address 


Ciry 




7ip 


Phone » 






Computet Name .irui Mudel 


Modem Name .ith! Mmlel 


□ Payment Et 

Credit C.ird * 


D Masti 

Expires 


D Visa 


Signature 



• -■'.'.. 

tilh Ir. r iHofGTI i n» Souro 

Tefccomp :• , rradrouiki 

res nc on ■ , re a 

, r m ■• . 

I re :- I 



TIED UP BY 

STRING 

COMPRESSION? 



CUT YOURSELF 
LOOSE WITH 
TR ASHMAN™ 




THIS PROGRAM IS A MUST FOR 
EVERYONE WHO USES "BASIC" 
ON A TRS-80. It reduces string com- 
pression delays by 95% or more You 
suiter from these delays whenever you 
run a BASIC program Your computer 
locks up for seconds, or minutes, and 
you may even think it's "crashed " 
TRASHMAN FIXES THE PROBLEM! 
As soon as you start to use it, those 
delays will almost disappear. The pro- 
gram is very easy to use. so you don't 
have to be a computer programmer to 
take advantage of it It's written in 
"machine languageand usesonly 578 
bytes of memory for itself, plus 2 bytes 
for each "string" in your program. It 
works with other machine language 
programs and all the major operating 
systems. 

IT SHOULD HAVE BEEN BUILT 
INTO THE COMPUTER IN THE FIRST 
PLACE, but since it wasn't, look at this 
chart, and then order your copy today 



# 


SECONDS DELAY 


STRINGS 


NORMAL TRASHM 


10 


.1 .1 


250 


11.8 0.7 


500 


45.1 1.6 


1000 


179.6 3.5 


2000 


713.2 7.8 



PERCENT 
IMPR0VEM 

94 
96.5 
98 
98.9 



■ Note Not lor use with 1 

". . . in those programs that use hundreds 
of strings arrays, the time saved is out- 
standing." 80 MICRO, Jan. "83 
Works great, had 45 sec. delays in 
printing, now almost no delays. D.T. 

"We have installed TRASHMAN in 
one of our most major programs and it 
has reduced the run time by over 
one-third! A.W.L 

TRASHMAN is available on Disk 
for the TRS-80 Models I 6k III for 
just $39.95 

Publishers TRA 



ORDER NOW. TOLL-FREE 
(800) 124-7888, oper. 422 



PM£Ml 



■<: 



, 



Dept. G, Box 560, No. Hollywood. CA 91603 

18I81 764-3131 Inlwralion and Same-Day Processing 

TERMS VISA. MC. cfwcks. COD P*as« add $2 00 si pp.na ■ 
US or Canada. S5 00 WM -a Most 
ordets Wled wrnm one iday 



Listing I continued 



. ** ***t 
FIND 



01300 

01310 

01320 

01330 CMDIN1 

01340 

01350 

01360 

01370 

013 80 

01390 

01400 

01410 

01420 

01430 

01440 

01450 

01460 

01470 

01480 

01490 

01500 

01510 

01520 

01530 

01540 

01550 

01560 

01570 

01580 

01590 

01600 

01610 

01620 

01630 

01640 

01650 

01660 

01670 

01680 

01690 

01700 

01710 

01720 

01730 

01740 

01750 

01760 

01770 

01780 

01790 

01800 

01810 

01820 

01830 

01840 

01850 

01860 

01870 

01880 

01890 

01900 

01910 

01920 

01930 

01940 

01950 

01960 

01970 

01980 

01990 

02000 

02010 

02020 

02030 

02040 

02050 

02060 

02070 

02080 

02090 

02100 

02110 

02120 

02130 

02140 

02150 

02160 

02170 

02180 

02190 

02200 

02210 

02220 

02230 

02240 

02250 



INC 

INC 

JR 

INC 

INC 

INC 

DEC 

JP 

JR 



VALID 'FIND' 

************ 

XEQCMD LD 
INC 
LD 
LD 
JP 



• ENTRY 
LD 

LD 

• ENTRY 
LD 

SUB 
JP 



HL 

HL 

CMDINT 

HL 

HL 

HL 

C 

Z,BASIC3 

CMDINT 



POP 

LD 

LD 

CALL 

JR 

CALL 

JP 

LD 

LD 

LD 

LDIR 

LD 

SUB 

CP 

JP 

LD 



LD 
LD 
LD 
LD 



LD 

LD 

INC 

PUSH 

LD 

LD 

LD 

INC 

INC 

LD 

INC 

LD 

LD 

POP 

INC 

INC 

INC 

CALL 

LD 

LD 

I.D 

CPI 

JR 

DEC 

LD 

CP 

INC 

JR 



COMMAND - SET UP 
***************** 

A, (HL) 

HL 

H, (HL) 

L,A 

(HL) 

POINT TO 'XREF' 

A.0FFH 

(XREFLG) ,A 

POINT TO SEARCH 

A. (TLENTH) 

03H 

Z.BASIC3 

BC 

HL, COUNT 

(HL) ,00H 

PRGTST 

NZ,FIND1 

NO PROG 

BASIC2 

BC,001FH 

DE.FTEMP 

HL,BASBUF+2 

A, (TLENTH) 

0311 

20H 

M.FIND2 

A.1FH 



;ELSE POINT HL TO NEXT... 
; COMMAND AND CONTINUE... 
;CMDTBL SEARCH. 
;INC HL TO POINT TO... 
;NEXT COMMAND. 

; DECREMENT LOOP COUNTER 
j NO 'FIND' COMMAND... 
;SO RETURN TO BASIC. 
;GO TEST NEXT ENTRY. 
I************************* 

JUMP ADDRESS & EXECUTE * 
>********************•**** 

;MUST GET JP ADDRESS... 
;INTO HL FOR JP. 



C,A 

B.00H 

(FLENTH) ,BC 
HL, (BASTRT) 



;HL POINTS AT CORRECT... 
?JP ADDRESS, SO DO IT I 
ROUTINE ******** 

;SET 'XREF' FLAG... 
;& DROP THROUGH TO 'FIND' 
('FIND') ROUTINE ******** 
;TEST TO MAKE SURE... 
;WE HAVE A VALID... 
;COMMAND BY RUNSTRING. . . 
; LENGTH. 

;POP 'BASIC RETURN ADDR 
j MUST ALSO ZERO OUT... 
; MATCH COUNTER. 
;SEE IF PROGRAM RESIDENT 
j PROGRAM IS RESIDENT 
;NO PROGRAM EXISTS,... 
; INFORM USER 6 QUIT. 
,-f.AX SEARCH STRING LENGTH 
;'FIND' BUFFER ADDRESS 
; START OF SEARCH STRING 
;COPY IT FOR 'FIND' 
.-RECOVER LINE LENGTH.. 
;REMOVE EFFECT OP... 
,-COMMAND, DELIMITER,... 
;AND TERMINATOR (CR) . 
;THEN FORCE SEARCH... 
,-STRING LENGTH TO... 
;31 CHARACTERS MAX. 
•PUT SEARCH STRING... 
; LENGTH INTO BC FOR... 
;LOOP COUNTER AND STORE. 
;GET START ADDR OF PRGM 



BEGIN BASIC PROGRAM SEARCH 



LD 
LD 
CP 



JR 
INC 

CP 
JR 
LD 
CP 
JP 
JR 



(THSLIN) ,HL 

C,(HL) 

HL 

HL 

B, (HL) 

(NXTLIN) ,BC 

HL,(NXTLIN) 

HL 

HI. 

E.(IIL) 

HL 

D, (HL) 

(LINTMP) ,DE 

KL 

HI, 

HI. 

HL 

EXPAND 

HL,BASBUF 

A, (FTEHP) 

BC, (FLENTH) 

Z,FIND7 
HL 

A.00H 
(HL) 
HL 
NZ.FIND4 

HL, (NXTLIN) 

A.00H 

(HL) 



NZ,FIND6 

HL 

(HL) 

Z,FIND10 

A, (FLAG) 

00H 

NZ,BASIC1 

REFIN1 



;SAVE ADDR OF CURRENT LIN 
;SET UP NEXT LINE ADDR. 



; STORE NEXT LINE ADDRESS 
;GET NEXT LINE ADDRESS 
;NCW FETCH NEXT... 

/LINE f IN BINARY AND... 
; STORE IT IN LINTMP. 

;SAVE CURRENT LINE * 
/RESTORE CURRENT LINE ADR 



; POINT TO TF.XT IN LINE 
;GO EXPAND BASIC LINE 
j ADDR OF EXPANDED LINE 
; FETCH 1ST CHAR OF STRING 
; FETCH LENGTH OF STRING 
/COMPARE A TO (HL) 
; IF CHAR MATCH, TEST REST 
;SEE IF BYTE WAS 00H... 

;ie, END OF LINE MARKER 

; POINT HL TO CURRENT CHAR 

;IF NOT 00H, TEST NEXT 

;IF 00H, END OF LINE 

;GET ADDRESS OF NEXT LINE 

;TEST FOR END OF TEXT... 

;ie, TWO BYTES OF 00H... 

,-WHERE AN ADDRESS... 

; SHOULD BE. 

;NOT END OF PROGRAM 

; FIRST BYTE WAS 00H, SO.. 

•TEST NEXT. IF 00H,... 

;END OF BASIC TEXT. 

;IF FLAG SET, A MATCH... 

;HAS BEEN FOUND, SO... 

;GO BACK TO INPUT PHASE. 

;IF FLAG NOT SET... 

; CONTINUE SEARCHING... 

; CONSECUTIVE LINES... 
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Listing 1 continued 










02260 








; UNTIL A MATCH OR.. . 


02270 








;END OP BASIC PROGRAM... 


02260 








;IS FOUND. 


02290 


,*••• 


ENTRY 


POINT FOR REFIND 


COMMAND (ie, F<ENTER>) **** 


02300 


REFIND 


POP 


BC 


;POP BASIC RETURN ADDRESS 


02310 




CALL 


PRGTST 


;SEE IF PROGRAM RESIDENT 


02320 




JR 


NZ,REFIN1 


; PROGRAM EXISTS.. . 


02330 








;SO CONTINUE SEARCH. 


02340 




CALL 


NOPROG 


;NO PROGRAM EXISTS... 


02350 




JP 


BASIC 2 


; INFORM USER AND QUIT. 


02360 


REFIN1 


LD 


DE.(LINTMP) 


;GET ADDR OF NEXT LINE. 


02370 




CALL 


PSTSRC 


1 SEARCH PST FOR LINE ADDR 


023 80 




JP 


C.REFIN2 


;NO SUCH LINE IF 'NC SET 


023 90 




LD 


HL,MESS6 


(Can't Continue message 


02400 




CALL 


VDLINE 


(PRINT IT... 


02410 




LD 


HL,CRLF 




02420 




CALL 


VDLINE 




02430 




JP 


BASIC 1 


;& RETURN TO BASIC. 


02440 


REFIN2 


LD 


(THSLIN) ,HL 


;SAVE CURRENT LINE ADDR 


02450 




LD 


(NXTLIN) ,BC 


;SAVE NEXT LINE ADDR 


02460 




LD 


HL,(NXTLIN) 


;PUT NEXT LINE ADDR IN HL 


02470 




JR 


FIND3 


;GO CONTINUE SEARCH 


02480 
02490 


■ #****#nii«ii«itwmw»» WW WWW mmwmm mm -mmwwtmm m m m m mm m w m ■ m m m — m •» « m ■ - - 

;**« FIRST CHARACTER MATCHED, NOW TEST REST OF STRING *** 


02500 
02510 


• ****** 

FIND7 


PUSH 


••••••■■■WWWWWWB 

HL 


(SAVE CURRENT CHAR POINTR 


02520 




LD 


DE.FTEMP+01H 


;DE POINTS § SRCH STRING 


02530 


FINDS 


LD 


A,B 


;SEE IF BC - YET 


02540 




OR 


C 


;IF ZERO, WE HAVE A... 


02550 




JR 


Z , FOUND 


.•COMPLETE MATCH! 1 I 


02560 




LD 


A,(DE) 


; MATCH NOT COMPLETE,... 


02570 




CPI 




(SO TEST NEXT CHAR. 


02580 




JR 


NZ,FIND9 


(CHARACTER DIDN'T MATCH.. 


02590 








;SO GO CONTINUE WHERE... 


02600 








;WE LEFT OFF. 


02610 




INC 


DE 


(MATCH AGAIN, SO POINT... 


02620 




JR 


FINDS 


;AT NEXT CHAR & REPEAT. 


02630 


FIND9 


POP 


HL 


(RETRIEVE POSITION OF... 


02640 




JR 


FIND4 


(SEARCH AND GO CONTINUE.. 


02650 








(WHERE WE LEFT OFF. 


02660 


FIND10 


LD 


HL,MESS1 


(END OF TEXT FOUND... 


02670 




CALL 


VDLINE 


(SO PRINT MESSAGE. 


026 80 




LD 


HL, (COUNT) 


(GET TOTAL # MATCHES... 


026 90 




CALL 


BINASC 


(CONVERT t PRINT IT. 


02700 




LD 


HL,MESS2 




02710 




CALL 


VDLINE 


(PRINT REST OF MESSAGE. 


02720 




LD 


HL, (BASTRT) 




02730 




LD 


(NXTLIN) ,HL 


(POINT TO START OF PROGRAM 


02740 




INC 


HL 


(MUST ALSO POINT LINTMP... 


02750 




INC 


HL 


(TO FIRST LINE #... 


02760 




LD 


E. (HL) 


(IN BASIC PROGRAM. 


02770 




INC 


HL 




02780 




LD 


D,(HL) 




02790 




LD 


(LINTMP) ,DE 




02800 




LD 


A.0FFH 




02810 




LD 


(FLAG) ,A 


(SET END OF TEXT FLAG. 


02820 




LD 


A.00H 




02830 




LD 


(XREFLG) ,A 


(RESET 'XREF' FLAG 


02840 




LD 


HL, COUNT 


(MUST ALSO ZERO OUT... 


02850 




LD 


(HL) ,00H 


(MATCH COUNTER. 


02860 




JP 


BASIC 1 


(GO BACK TO INPUT 


02870 


, ****** ****** 


a******************************************* 


02880 


;**** COMPLETE MATCH FOUND - 


PRINT LINE fc RETURN TO USER 


02890 


. •********••< 


******************************************** 


02900 


FOUND 


POP 


HL 


(CLEAN UP STACK 


02910 




LD 


HL, (THSLIN) 


(LINE WHERE MATCH FOUND 


02920 




INC 


HL 


(NOW INC HL TO POINT... 


02930 




INC 


HL 


(TO LINE ». 


02940 




LD 


C,(HL) 


(MOVE IT INTO BC... 


02950 




INC 


HL 




02960 




LD 


B, (HL) 


(NOW SAVE IT IN.. . 


02970 




LD 


(LINPTR) ,BC 


(CURRENT LINE POINTER 


02980 




PUSH 


BC 


(PUT LINE 1 IN HEX... 


02990 




POP 


HL 


(INTO HL TO CONVERT... 


03000 




CALL 


BINASC 


(AND PRINT LINE i. 


03010 




LD 


HL, BLANK 


(PRINT A BLANK... 


03020 




CALL 


VDLINE 


(AFTER LINE NUMBER. 


03030 




LD 


A. ! XREFLG) 


(TEST 'XREF' FLAG 


03040 




CP 


00H 


(SEE IF IT IS SET 


03050 




JR 


NZ,FIND11 


;IF SET, PRINT ONLY LINEI 


03060 




LD 


HL,BASBUF 


(PUT ADDRESS OF... 


03070 




CALL 


VDLINE 


(EXPANDED LINE INTO HL... 


03080 








(AND PRINT LINE. 


03090 




LD 


HL.CRLF 


(CARRIAGE RETURN TO... 


03100 




CALL 


VDLINE 


(TERMINATE LINE WITH. 


03110 


FIND11 


LD 


HL, COUNT 


(GET 1 MATCHES... 


03120 




INC 


(HL) 


(AND INCREMENT IT. 


03130 




LD 


A.0FFH 




03140 




LD 


(FLAG) ,A 


;SET MATCH FLAG 


03150 




JP 


FIND5 


(BACK TO INPUT ROUTINE 


03160 


.***•* 


***** 


ENTRY POINT FOR 




03170 


MCHCNT 


LD 


HL, (COUNT) 


(PRINT # MATCHES FOR USER 


03180 




CALL 


BINASC 


(GO PRINT COUNT 


03190 




LD 


HL,MESS2 


(PRINT REST OF MESSAGE 


03200 




CALL 


VDLINE 




03210 




POP 


BC 


(POP RET ADDR OFF STACK 


03220 




JP 


BASIC2 


(RETURN TO BASIC 'READY' 
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FASTER speeds up most TRS-80 
BASIC programs by 20-50% It 
analyses programs while they run, 
then displays a simple change to 
sequence variables so the ROM will 
find them faster 

You can use FASTER to speed up 
programs you've bought as well as 
programs you've written. 
"If you . . . would like a significant 
increase in the run-time speed, then 
buy FASTER" 

80 MICRO (April, 1982) 

Models I & III, 16-48K Tape 

or Disk, all DOS's. $29.95 




RPM TO THE 
RESCUE 





Find out if your drives need adjust- 
ment before you begin to lose files 
SAVE on repair bills This easy-to-use 
program measures the rotational speed 
and fluctuations of your disk drives, 
and warns you if they are running too 
fast, too slow, or unevenly. 
80 MICRO (April, 1982) said "If your 
drives have problems I recommend 
RPM before paying to get it repaired." 
Customers agree: 

"EXCELLENT — Has paid for itself 
already! Saved the cost of Radio Shack's 
doing the speed adjust!" (D.M.) 
Models 1, 3 and 4 (in 3 mode) We 
suggest you order a copy before you 
need it. 

RPM $24.95 



ORDER NOW, TOLL-FREE 
(800) 824-7888, oper. 422 

PRfcWS- - 

Dept. G. Box 560, No. Hollywood. CA 91603 
(8181 764-3131 Infwmatton and Same Day Processing 



.- See List ol Advertisers on Page 176 
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Call ELEK-TEK for 



UNBELIEVABLE 
PRICES!! 



on 

EPSON 

PRINTERS 




80 COLUMN PRINTERS 

RX 80 100 c.p.s. Tractor only 
RX-80FT. 100 c.p.s. Tractor'Friction 
FX 80 160 c.p.s. Tractor'Friction 

132 COLUMN PRINTERS 

RX-100 100 c.p.s. Tractor/Friction 
FX 100 160 c.p.s. Tractor'Friction 

NEW Near Letter Quality 
PRINTER 

LQ 1500 

200/67 c.p.s. Tractor'Friction 



Cables for Epson 

CB5622 10 ft 36 36 pin 

standard parallel 32.00 

CBS609 10 ft 36 25 p.n parallel 

for IBM 25.00 

CB5618 6 ft. 36 16 pin parallel 

for Tl 99 4A 25.00 

CB5629 10 ft. 25 pin 

standard RS 232(fully loaded) 25.00 

CB5620 6 ft. parallel 

for TRS 80 Model I -III IV 22.00 

RS1Y RS 232 Y cable for Tl 99 4A 25.00 



DUST COVERS 

AVAILABLE FOR 

MOST MODELS— S5.00 



Interfaces 

CAROCO G 

APPLE DUMPLING GX 

GRAPPLER PLUS 

Buffered (16K) GRAPPLER PLUS 

8148 Ser. (For RX or FX Models) 

8161 IEEE 488 Interface 

Ribbon Cartridges 

DPR 192 For EPSON 80 col. printers 
DPR 193 For EPSON 132 col. printers 



65 00 
65.00 
105.00 
165.00 
90.00 
60.00 



4.00 
6.00 



CALL TOLL FREE 800-621-1269 
EXCEPT Illinois, Alaska,, Hawaii 



Corp Acct* invited Mm Ord SIS. 00 

(AK, HI, PR .Canada add 
S10 00lr»l,tem) 

WRITE lor tree 
catalog Return policy lor detective on arrival replace 
menu on, 90 day ml- wty ALL ELEK TEK MERCHAN 
OISE iS BRAND NEW FIRST QUALITY AND COMPLETE 



L Inc. 



6557 N Lincoln Av» . Chicogo IL60645 
(•00)621-1269 (312)477 76*0 
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03230 


. *********** 


ENTRY POINT FOR 


E<ENTER> COMMAND *********** 




03240 


EDIT1 


POP 


BC 


;POP BASIC RETURN ADDRESS 




03250 




LD 


DE.(LINPTR) 


;LINE 1 TO EDIT. 




03260 




JP 


EDIT 


;LET USER EDIT LINE 




03270 


.*•**** 


***** 


ENTRY POINT FOR 






03280 


REPLAC 


I.D 


A.0FFH 


;SET FLAG FOR COPY. 




03290 




LD 


(RFLAG) ,A 


;SO IT CAN REPLACE... 




03300 








;AN EXISTING LINE. 




03310 


j ***** * 


** *** 


ENTRY POINT FOR 


C<ENTER> COMMAND *********** 




03320 


COPY 


LD 


HL,BASBUF+2 


;GET ASCII SOURCE LINE # 




03330 




CALL 


ASCBIN 


; CONVERT SOURCE TO BINARY 




03340 




LD 


(OLDLIN) ,DE 


; STORE IT 




03350 




INC 


HL 


; POINT TO ASCII... 




03360 








/DESTINATION LINE NUMBER. 




03370 




CALL 


ASCBIN 


;CONVERT IT TO BINARY 




03380 




LD 


(NEWLIN) ,DE 


; STORE IT 




03390 




CALL 


PSTSRC 


;GO SEARCH PST FOR... 




03400 








/DESTINATION LINE #... 




03410 




JP 


NC.COPYl 


;IF IT DOESN'T EXIST... 




03420 








;WE CAN COPY TO IT. 




03430 




LD 


A, (RFLAG) 


/CHECK <R>EPLACE FLAG... 




03440 




CP 


0FFH 


;IF IT IS SET.. . 




03450 








;WE WILL COPY OVER IT. 




03460 




JR 


Z,C0PY1 


;FLAG WAS SET - REPLACE 




03470 




LD 


A, (MFLAG) 


j ALSO TEST MFLAG - WE... 




03480 




CP 


0FFH 


;WILL UNCONDITIONALLY... 




03490 




JR 


Z,C0PY1 


;M0VE A LINE. 




03500 




LD 


HL,MESS3 


/INFORM USER THAT LINE... 




03510 




CALL 


VDLINE 


/ALREADY EXISTS. 




03520 




POP 


BC 


/POP BASIC RETURN ADDRESS 




03530 




JP 


BASIC 2 


/AND RETURN TO BASIC. 




03540 


COPY1 


LD 


A.00H 


/MUST ZERO OUT... 




03550 




I.D 


(RFLAG) ,A 


/REPLACE FLAG. 




03560 




LD 


DE, (OLDLIN) 


/GET 1 OF LINE TO COPY... 




03570 




CALL 


PSTSRC 


/SEE IF IT EXISTS... 




03580 




JH 


CCOPY2 


j IF IT DOES, WE CAN... 




03590 




LD 


HL.NOLINE 


/COPY, ELSE INFORM USER.. 




03600 




CALL 


VDLINE 


/THAT LINE DOESN'T EXIST. 




03610 




LD 


HL.CRLF 


/MUST PRINT CARRIAGE... 




03620 




CALL 


VDLINE 


/RETURN & LINE FEED. 




03630 




POP 


BC 


/POP BASIC RETURN ADDRESS 




03640 




LD 


A.00H 


/MUST RESET MFLAG... 




03650 




LD 


(MFLAG) ,A 


/IN CASE OF MOVE CMD. 




03660 




JP 


BASIC2 


/RETURN TO BASIC 




03670 


COPY2 


PUSH 


BC 


/SAVE OLD LINE ADDRESS 




03680 




LD 


HL, (NEWLIN) 


/GET BINARY LINE #... 




03690 




CALL 


BINASC 


/GO CONVERT AND PRINT IT 




03700 




LD 


HL, BLANK 


/PRINT BLANK AFTER... 




03710 




CALL 


VDLINE 


/LINE «. 




03720 


; * * NOW 


WE MUST MOVE ASCII LINE 1 TO BASBUF FOR BASIC ** 




03730 




LD 


DE, BASBUF 


/ADDRESS TO MOVE TO 




03740 




LD 


HL,BINBUF 


/ADDRESS TO MOVE FROM 




03750 




LD 


BC,05H 


/MAX 1 BYTES TO MOVE 




03760 


COPY3 


LD 


A, (HL) 


/HAVE PRECEDING BLANKS... 




03770 




CP 


• ' 


/MUST STRIP THEM TO... 




03780 




JR 


NZ,C0PY4 


/AVOID PUTTING THEM... 




03790 




DEC 


BC 


/INTO BASBUF. 




03800 




INC 


HL 






03 810 




JR 


C0PY3 






03820 


COPY 4 


LD 


A,C 


/SAVE I ASCII BYTES IN A. 




03830 




LDIR 




/MOVE ASCII LINE 1 TO HL. 




03840 




POP 


HL 


/LINE ADDRESS TO HL... 




03850 




INC 


HL 


/INC HL 4 TIMES.. . 




03860 




INC 


HL 


/TO POINT AT START... 




03870 




INC 


HL 


/OF ASCII TEXT OF LINE. 




03880 




INC 


HL 






03890 




LD 


BC, BASBUF 


/GET BUFFER ADDRESS 




03900 




ADD 


A.C 


/AND BUMP UP SO WE... 




03910 




LD 


C,A 


/DON'T OVERWRITE LINE 1. 




03920 




PUSH 


BC 


/SAVE ADDRESS FOR HL. 




03930 




CALL 


EXPAN1 


/GO EXPAND LINE AND... 




03940 




POP 


HL 






03950 




CALL 


VDLINE 


/PRINT REST OF LINE. 




03960 




LD 


HL,CRLF 


/PRINT CARRIAGE RETURN 




03970 




CALL 


VDLINE 






03980 




JP 


BASIC3 


/RETURN AND LET BASIC... 




03990 








/COMPRESS & INSERT LINE. 




04000 


. ****** 


***** 


ENTRY POINT FOR 


M<ENTER> COMMAND *********** 




04010 


MOVE 


LD 


HL,BASBUF+2 


/PREPARE TO MOVE.. . 




04020 




LD 


DE.MOVBUF 


/ASCII LINE 1 TO.. . 




04030 




LD 


BC,05H 


,-MOVBUF TO STORE. 




04040 


MOV1 


LDI 




/SAVE ASCII CHARACTER 




04050 




LD 


A.(HL) 


/GET NEXT CHAR. 




04060 




CP 


' , • 


•TEST FOR ' .' 




04070 




JR 


Z,MOV2 


/IF ' . ' , GO COPY 




04080 




LD 


A.B 


/IF BC»0 AND NO '.'... 




04090 




OR 


C 


/DELIMITER, MORE THAN... 




04100 




JP 


Z,BASIC3 


J 5 CHAR'S - SYNTAX ERROR 




04110 




JR 


M0V1 


/TEST NEXT CHARACTER 




04120 


MOV2 


LD 


A,0FFH 


/SET 'MOVE' FLAG... 




04130 




LD 


(MFLAG) ,A 


;T0 ALL l'S 




04140 




JP 


COPY 


/GO COPY LINE. 




04150 






REENTRY POINT FOR M<ENTER> COMMAND ********* 




04160 


H0V3 


LD 


HL,M0VBUF 


/MOVE ASCII SOURCE... 




04170 




LD 


DE, BASBUF 


/LINE 1 INTO BASBUF TO... 




04180 




LD 


BC,06H 


/DELETE SOURCE LINE. 




04190 




LDIR 
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DISK SUPER SAVER 

Nashua sgl 

Professional Magnetic f §\ ' ' 
Media v - 

Certified 100% Error Free 
LIFETIME WARRANTY 

5 1 / 4 " SS/SD $1.39 

SS/DD $1.49 

DS/DD $1.99 

8" SS/SD $2.04 

SS/DD $2.44 

DS/DD $2.88 

Minimum order 20 diskettes Quantity discounts 1 00 deduct 5%. 1000 deduct 
15% We accept MasterCard Visa cheeks and money orders Most orde's 
shipped withm 24 hours P.O s accepted from most schools, govt agences 
and Fortune 1000 companies Shipping and handling FOB Amheist S3 00 
additional lor CO O orders Prices subiect to change without notice 

Send or phone your order to: 

A EC 

^^ H P.O. Box 183, Amherst, N.H. 03031 ^^^ 

.IV:'-. Toll Free 1-800-431-8031 ^^ 

m ^ m In N.H. call 603-673-3137 ""-""" 



!■ ■ ■ I 



I 



N.C.I, 
proudly introduces 

FORESIGHT I 

The multi-divisional 
FINANCIAL SYSTEM 

• Accounts Receivable 

• Accounts Payable 

• General Ledger 

• Up to 8 Divisional Income Statements 

• Consolidated Balance Sheet 

• Aged Analysis Reports 

• Transaction Journals 

• Printed Customer Statements 

• All One One Programme Diskette 

• Runs on Newdos 80 MOD III & 4 

• On Mod 2000 and IBM compatibles soon 

• Your first Balance Sheet Guaranteed 

FORESIGHT I will do all of this and much more: 

bASY to read — EASY to set up — RUNS on single or double sided 
drives 

Until now, EORESIGHT I was available only to a select group of 
businesses and accountants for $990 00 It can now be yours for: 

AN INCREDIBLE INTRODUCTORY PRICE 
of only $429.00 U.S. 

Io take advantage of this offer, order yours today, or tall or write for more in- 
formation. 

Send i ertified cheque or money order in US funds to 

NAUTILUS COMPUTERS INC. 

2411-117 ST. 

EDMONTON, ALBERTA 

CANADA T6J-3R4 .-379 

PH 403-434-3641 



EXPAND TRS-80 MEMORY 



TRS-80 to 16K, 32K, or 48K 

"Model 1 From 4K-16K Requires (1) One Kit 

Model 3 = From 4K-48K Requires (3) Three Kits 
Color From 4K-16K Requires (1) Kit 

"Model 1 •quipped with Expansion Board up to 48K Two Kits Required 
- One Kit Required for each 16K ol Expansion - 

TRS-16K3 200ns for Color & Model III $12.95 

TRS-16K4 250ns for Model I $10.95 



TRS-80 Color 32K or 64K Conversion Kit 



Easy to install kits come complete with 8 ea. 4164-2 (200ns) 64K 
dynamic RAMs and conversion documentation. Converts TRS-80 
color computers with D, E. ET, F and NC circuit boards to 32K. 
Also converts TRS-80 color computer II to 64K Flex DOS or OS-9 
required to utilize full 64K RAM on all computers. 

TRS-64K2 $44.95 

Easy to install kit comes complete with 8 each 41 64 (200ns) 64K 
dynamic RAMs and conversion documentation Converts TRS-80 
Model IV computers from 1 6K to 64K. 

TRS-64K2 $44.95 

(Converts from 16K to 64K) 

TRS-64K2PAL $69.95 

(8-41 64s with PAL Chip to expand from 64K to 128K) 

DIP/IC INSERTER/EXTRACTOR TOOLS 

INS-I416(lnserts both 14/16 pin pkgs.) $5.49 

EX-1 (Extracts 8-24 pin pkgs.) $2.29 

5V«" Diskettes 

SSDD Single Sided Double Density 
„, . „ DSDD Double Sided Double Density 

iik» ULTRA MAGNETIC S 

Part No. Description Boxad Price 

UM51401 SSDD with Hub Ring 10 $24.95 
UM52401 DSDD with Hub Ring 10 32.95 

All diskettes are soft-sectored and have hub rings 
Bulk prices available on request 

DISK MINDER 






• Attractive, functional disk storage system • 50 (8") or 75 (5^*") 
disk storage capacity • Easy filing and retrieving • Protects disk 
from dust contamination • Molded from durable smoked plastic 
with front carrying handle • Size: 7"W x 6VH x 9VD ■ Wt.: 2 lbs 

Part Mo DeecripMon PRICE 

DM75 
DM50 



Stores 75 (5 V) Diskettes $19.95 each 

Stores 50 (8") Diskettes $29.95 each 



We also specialize in integrated circuits, custom cables, 

power supplies, keyboards, and much, much more! 

Give us a call today! 



i,iL5 Protect Yourself... 
DATASHIELD 
Surge Protector 

Eliminates voltage spikes and EMI-RFI noise be- 
fore it can damage your equipment or cause 
data loss. Six month warranty. 

Model 100 $69.95 

DATA SHIELD Back-Up Power Source also available 
Protect your TRS-80 Model computers. 

PC200 (200 Watt Rating) $349.95 

XT300 (300 Watt Rating) $489.95 




$10 00 Minimum Order - US Fund* Oily 
CaMorntt Kaultoli Add S'iS Selee Tai 
SrMppang - Add 5*. piui SI SO Insurance 
SendSASE lot MonrMy Sate! flyer' 



Spec SM« - 30* eech 
Send $1 00 •oeteg* toe your 
FBtE IW4 JAUeCO CATALOG 
Pre** Subject to Change 






Jameco 



VISA' 



* See list ol Advertisers on Page 176 



1355 SHOREWAY ROAD. BELMONT, CA 94002 
Phone Orders Welcome (415) 592-8097 Telex: 176043 
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Super Sale on New Hard Drives 

Introducing 

MEGADISK 




TM 



Winchester, Hard Drive ready to 
run on the TRS 80 Model I/III/IV/4P, 
Color Computer, I.B.M.-PC, Apple, 
Franklin, Max/80, Warranty 1 year 
Supporting LDOS, NewDos/80, Dosplus, 
TRSDOS 6.0 

DRIVE A HARD BARGAIN™ Complete System Starting at$999#S: Call For New Low Price. 

Call Toll Free Ordering 1-800-343-8841 





High Quality Lowest Price 

Drive 0, 1, 2, 3 

for the 

Color Computer 

Starting at $199.95 



Disk Drive Upgrade 

for Model III/IV easy to install system 
Starting at 5369^5" 

Call for new lower price 



SOFTWARE SUPPORT, INC. 



One Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425 

Q Hours: Mon. thru Fri. 9:30 am to 5:30 (E.S.T.) Sat. 10 am to 4:30 pm 

g DEALER INQUIRIES INVITED 



CANADA 
MICRO R.G.S. INC. 

751. CARRE VICTORIA. SUITE 403 

MONTREAL. QUEBEC. CANADA. H2Y 2J3 

Regular Tel. (514) 287-1563 

Canadian Toll Free 800-361-5155 



TERMS: 

M.C./Visa/Amex and personal 

checks accepted at no extra charge. 

C.O.D., please add $3.00. 

Shipping: Please call lor amount. 

Not responsible for typographical errors. 

Prices subject to change. 

TRS/80 Registered Trademark Tandy Corp. Apple Registered Trademark Apple Computer Corp 

-:» IBM-PC Registered IBM Corp. Franklin Registered Trademark Franklin Corp. Max/80 Registered Trademark Lobo Int. 

S I DOS Reg. Logical System Inc. Dosplus - Micro Systems Software Newdos/80 - Apparat Inc. 

S1AIUQ MSia 83AIUQ MSia SBAIUrj MSICI S3AIMQ MSia S3AIUQ XSIQ S3AIHQ M8IQ S3AIUQ M8IQ 



Service! Service! 

All in stock products are shipped 



within 24 hours of order. 
Repair/ Warranty service is performed 
within 24 hours of receipt unless 
otherwise noted. We accept CO. D., 
foreign and A PO orders. School 
and DAB corporate P.O.s accepted. 
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Super Sale on New Disk Drives 

Starting at $«nMHE N ™ Low 

° Price 

Tandon — Siemens— Remex—MPI — Teac — Shugart 

40 or 80 Tracks — Single or Dual Head — New 3W Drivette tm 
Our Disk Drives are Capable of Single and Dual Density Operation 
The NEWEST Technology Capable of Operating on Most Popular Computers 
Drive a Hard Bargain!! ™ For your TRS/80, Color Computer, IBM, Apple, Franklin, 

Max/80, Complete Systems from^#9rOS [Z'Z^ 

Diskette Breakthrough — 10 Pack in Library Case — $J#HKl , 



CO 



33 

< 
m 
CO 



co 

(all Poi ' 

New 
ov* Price — 

PLEASE CALL FOR OUR MOST CURRENT PRICE REDUCTIONS. § 



TOLL 



FREE 



FOR 
NEW 



PRICES 



TOLL FREE ORDERING GENERAL AND TECHNICAL 

1-800-343-8841 1-617-872-9090 

Disk Drives (0123) TRS/80-IBM-Apple-TI-Franklin-Max/80-LNW + CALL 

Model I/III/IV Upgrade (Disk Drives - Memory) -< 

Printers — Daisywheel/Dot Matrix -^ 

Percom Double Density Controller (Model I) < 

Color Computer Printer Interfaces -^ 

Disk Drive Operating Systems M 

Repair Services Now Offered — FAST Turn-a-Round -< 

Apple/Franklin Compatible Add-On Drives with Case & Cable ■< 

Diskettes in Library Cases -^ 

DISK DRIVE CASES AND POWER SUPPLIES M 

Printer Buffers 8K to 512K starting at $143.95 

Model I/III/IV Speed-up Mod (up to 5 mhz) starting at $79.95 

Cables— Printer/Disk Drive starting at $16.00 

Warranty on Disk Drives — 1 Full Year Parts and Labor 

i SOFTWARE SUPPORT, INC. 

S One Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425 

■ Hours: Vton. thru Fri. 9:30 am to 5:30 (E.S.T.) Sat. 10 am to 4:30 pm 

J DEALER INQUIRIES INVITED. | I Service! Service! 

All in stock products are shipped 
within 24 hours of order. 
Repair/ Warranty service is performed 
within 24 hours of receipt unless 
otherwise noted. We accept C.O.D., 
foreign and APO orders. School 
and DAB corporate P. O. s accepted. 
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CANADA 
MICRO R.G.S. INC. 

751. CARRE VICTORIA. SUITE 403 
MONTREAL. QUEBEC, CANADA, H2Y 2J3' 

Regular Tel. (514) 287-1563 
Canadian Toll Free 800-361-5155 



Q TERMS: 

M.C./Visa/Amex and personal 

checks accepted at no extra charge. 
jg C.O.D.. please add $3.00. 

^ Shipping: Please call for amount, 

g Not responsible for typographical errors. 

Q Prices subject to change. 

J£ TRS/80 Registered Trademark Tandy Corp. Apple Registered Trademark Apple Computer Corp 2 

W IBM-PC Registered IBM Corp. Franklin Registered Trademark Franklin Corp. Max/80 Registered Trademark Lobo Int. jj; 

Q LDOS Reg. Logical System Inc. Dosplus - Micro Systems Software Newdos/80 - Apparat Inc. g) 

S3AIHQ MSia S3AIHQ MSIQ S3AIUQ MSId S3AIUQ MSIQ 33AIUQ MSIQ S3AIHQ MSIQ S3AHJQ MSIQ 
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PASCAL -80 

The 



«« 



jCr Can't 
Buy it! 



If we wanted to, we could sell our 
other products to the communists, 
but the Department of Defense 
won't let us sell them Pascal 80! 
NOW you can learn the language 
that is too powerful for the Red 
Army! 

Pascal 80 is the easiest version of 
Pascal to learn. Hundreds of 
schools, including top universitites 
are now using Pascal 80 to teach 
Pascal. 

With the editor and compiler in 
memory, you can compile and run 
a short program in under 5 
seconds. But you also get 
extensions to Pascal that give you 
screen control, random access 
files, calls to machine language 
and the ability to create turn-key 
packages. Pascal 80 is a nearly 
complete subset of standard 
Pascal, including structured types, 
records, pointer variables and files. 

--TRS-80 Models I, III and 4- 
Pascal 80 - $79 + $2 shipping 

Graphics Extensions for Radio 
Shack hi-res board - $39 

Pascal 80 Trial Version -$15 

--for CP/M 80 2.2or3.0-- 
Kaypro, LoboMax 80, Apple, Epson 
Osborne, and other computers. 
Call or write for other formats 
Pascal 80 CP/M - $39 + $2 
shipping 

Pascal 80 School Package 
(TRS-80 or CP/M versions) -$279 



N E ^UC LASSICS 

SOFTWARE 



239 Fox Hill Road 

Denville, NJ 07834 

201-625-8838 
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04200 






LD 


A.00H 




04210 






LD 


(MFLAG) ,A 


( RESET MFLAG 


04220 






LD 


(MOVBUF) ,A 


;ZERO OUT MOVBUF 


04230 






LD 


HL, MOVBUF 


;SIX BYTES TO ZERO OUT 


04240 






LD 


DE,MOVBUF+l 




04250 






LD 


BC,05H 




04260 






LDIR 






04270 






LD 


HL,BASBUF-1 


j SET UP HL FOR BASIC 


04280 






OR 


A 


(CLEAR CARRY FLAG 


04290 
04300 


. ** 




RET 


ENTRY POINT FOR 


; RETURN TO BASIC 'READY' 


*..... 


04310 


UNNEW 


LD 


HL,(BASTRT) 


;GET START OF BASIC PROG 


04320 






LD 


A,(HL) 


;SEE IF PROGRAM HAS... 


04330 






INC 


HL 


; ACTUALLY BEEN 'NEW 'ED... 


04340 






LD 


B, (HL) 


;BEFORE ATTEMPTING TO... 


04350 






OR 


B 


; RESTORE IT BY TESTING... 


04360 






JR 


NZ,UNNEW5 


j FIRST PST LINE POINTER.. 


04370 






DEC 


HL 


;IF 0, HAS BEEN 'NEW* ED. 


04380 






LD 


DE r 0FH 


; POINT TO 1ST UNCHANGED.. 


04390 






ADD 


HL,DE 


;BYTE IN MEMORY. 


04400 






LD 


BC,249 


; MAX I MUM LINE LENGTH 


04410 


UNNEW1 


LD 


A.00H 


;END OF LINE MARKER 


04420 






CPIR 




; SEARCH FOR END OF LINE 


04430 






JR 


NZ,UNNEW5 


;IF NZ, NO MATCH - EXIT. 


04440 






INC 


HL 


; A ' GOTO ' OR ' GOSUB * . . . 


04450 






LD 


A.NUM 


; COULD PUT A ZERO INTO... 


04460 






CP 


(HL) 


;A LINE, SO TEST MSB... 


04470 






JR 


Z,UNNEW2 


;OF 2nd BYTE AFTER ZERO.. 


04480 






INC 


A 


{FOUND. IF 80H OR 81H... 


04490 






CP 


(HL) 


;IS THERE, WE HAVE A... 


04500 






JR 


Z,UNNEW2 


;GOOD CHANCE THAT WE... 


04510 






DEC 


HL 


;HAVE INDEED FOUND THE... 


04520 






JR 


UNNEW1 


(END OF THE LINE - IF... 


04530 










(NOT WE DEFINITELY HAVE.. 


04540 










;NOT FOUND IT. 


04550 


UNNEW2 


DEC 


HL 


(POINT HL TO START OF... 


04560 










; FIRST VALID LINE FOUND. 


04570 






EX 


DE.HL 


(MOVE POINTER INTO DE 


04580 






LD 


HL,(BASTRT) 


1 GET START OF BASIC PROG 


04590 






LD 


BC,0BH 


;WE MUST RE-ESTABLISH... 


04600 






ADD 


HL,BC 


{PROGRAM LINKAGE BY... 


04610 






LD 


(HL) ,E 


{PUTTING A NEXT LINE... 


04620 






INC 


HL 


{POINTER INTO MEMORY... 


04630 






LD 


(HL) ,D 


{AT START OF REMAINDER... 


04640 






INC 


HL 


{OF LINE FOUND, AND A... 


04650 






LD 


(HL) ,01H 


{LINE # (1) ALSO. 


04660 






INC 


HL 




04670 






LD 


(HL) ,00H 




04680 






LD 


HL,(BASTRT) 


;GET START OF BASIC PROG 


04690 






PUSH 


HL 


(SAVE IT 


04700 






LD 


DE.0BH 


{» BYTES TO START... 


04710 






ADD 


HL,DE 


{OF 2ND LINE. 


04720 






EX 


DE.HL 


{MOVE RESULT INTO 'DE' 


04730 






POP 


HL 


(GET START OF PROGRAM 


04740 






LD 


(HL) ,E 


(SET UP NEXT LINE POINTER 


04750 






INC 


HL 




04760 






LD 


(HL) ,D 




04770 






INC 


HL 




04780 






LD 


(HL) ,00H 


(SET UP LINE « AS 


04790 






INC 


HL 




04800 






LD 


(HL) ,00H 




04810 






INC 


HL 




04820 






LD 


BC,05H 




04830 






PUSH 


HL 


(GET HL INTO DE 


04840 






POP 


DE 




04850 






INC 


DE 


(POINT TO NEXT CHARACTER 


04860 






LD 


(HL) ,'U' 


;PAD LINE WITH... 


04870 






LDIR 




(ASCII 'U'b. 


04880 






LD 


(HL) ,00H 


,-END OF LINE MARKER 


04890 


;** 


***« 




......................*..*...**......*....... 


04900 




WE 


HAVE 


NOW RE-ESTABLISHED THE PROGRAM LINKAGE FOR ** 


04910 


(** 


BASIC. 


THERE IS ONE THING LEFT TO DO; LOCATIONS ** 


04920 


;** 


719FH k 


71A0H CONTAIN THE ADDRESS THAT IS THE END ** 


04930 


... 


OF 


THE BASIC PROGRAM + 3 


BYTES, AND THE 'NEW' ** 


04940 




COMMAND 


RESETS THAT POINTER, SO NOW WE SEARCH FOR ** 


04950 


. .. 


THE END 


OF THE PROGRAM, 


MARKED WITH TWO BYTES OF ** 


04960 


;** 


00H, INC 


HL BY 3 TO POINT AT THIS LOCATION, THEN ** 


04970 


. .. 


RE- 


ESTABLISH THE END OF 


PROGRAM MARKER IN THE ** 


04980 


•** 


COMMUNICATIONS REGION AT 719FH & 71A0H. ** 




04990 


;** 


NOTE: THE ABOVE LOCATIONS ARE 611BH & 611CH ** 




05000 


. .. 


IN 


BASIC 


01.00.00. SEE 


BASEND AT START OF PROGRAM.** 




05010 














05020 






LD 


A,00H 


(END OF PROG MARKER 




05030 






LD 


HL,(BASTRT) 


(GET START OF PROG ADDR 




05040 


UNNEW3 


LD 


E. (HL) 


(GET ADDRESS OF NEXT... 




05050 






INC 


HL 


(LINE POINTER INTO DE. 




05060 






LD 


D,(HL) 






05070 






EX 


DE,HL 


(MOVE IT INTO HL SO... 




05080 






CP 


(HL) 


(WE CAN TEST FOR ZERO. 




05090 






JR 


NZ,UNNEW3 


(IF NOT ZERO, GO TEST... 




05100 






INC 


HL 


(NEXT LINE POINTER,... 




05110 






CP 


(HL) 


(ELSE TEST NEXT BYTE. 




05120 






JR 


Z.UNNEW4 


(IF IT IS ALSO ZERO,... 




05130 










{HAVE END OF PROGRAM,... 




05140 






DEC 


HL 


(ELSE DEC HL TO POINT... 




05150 






JR 


UNNEW3 


(AT NEXT LINE POINTER... 

Listing I continued 
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You've Got 

TOTAL ACCESS 



( specializing In TRS80 *) 



Rose 



QUALITY DISK DRIVES 

These drives are complete with power supply, cover and 
external drive connector For TRS-80 Model I, III. 4. IBM 
PC and others All drives are Double Density and step 
at 6ms or less SS means single head, DS is double 
head Specify white or silver color cover Add $5 per 
drive shipping unless otherwise specified All drives have 
a one year warranty on parts and labor 

COMPLETE FULL SIZE 5.25" DISK 
DRIVES 



40tk Single Side Tandon TM 100-1 

40tk Dual Side Tandon TM 100-2 

80tk Dual Side Tandon TM101-4 

COMPLETE HALF-HIGH 5.25" 
DRIVES 

lea 40tk SS TEAC FD-55A in dual case 

2ea 40tk SS TEAC FD-55A in dual case 

lea 40tk DS TEAC FD-55B in dual case 

2ea 40tk DS TEAC FD-55B in dual case 

1ea 80tk DS TEAC FD-55F m dual case 

2ea 80tk DS TEAC FD-55F m dual case 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAYI 

ROSE GETS RIGHT! • 

NOW— ROSE'S 
MOD 4 CP/M 

$69 



$ 189 
243 
297 

DISK 



COMPLETE 8' 

ArK S'C shipping je< 2 S" 



DISK DRIVES 



2ea SS TM848-1E's in dual case with fan 
2ea DS TM848-2E s in dual case with fan 

BARE 5.25" A 8" DISK DRIVES 

Aac S4 sr.»nc p« drive 

40tk SS. Full Size, Tandon TM100-1 

40tk DS. Full Size. Tandon TM 100-2 

80ik DS, Full Size, Tandon TM101-4 

40tk SS, Half-High, TEAC FD55-A 
40tk DS. Half-High. TEAC FD55-B 
80tk DS. Half High, TEAC FD55-F ..... 
8 SS. Thinlme. Tandon TM848-1E 
8" DS, Thinlme, Tandon TM848-2E 



$ 189 
324 
243 
424 
297 
522 



S699 
849 



$ 159 
199 
269 
159 
199 
269 
290 
390 

TRS-80 MODEL HI/4 DISK DRIVE KITS 

A3C S8 Shipping pe- hi 

Internal drive kit complete with disk controller, power 
supply, mounting brackets, cables and all hardware plus 
step-by-step instructions This kit contains everything 
you need (except the Disk Operating System, drive and 
a screwdriver) to convert your cassette Model III or 4 
to fast reliable disk operation Don't confuse this quality 
kit with the high-priced npoffs Thousands of satisfied 
customers cannot be wrong You can |Oin them for 
only $ 199 

Same as above but with 1-40tk SS drive 350 

Same as above but with 2-40tk SS drives 499 



OTHER DRIVE GOODIES 

AfJc S." shipping 

TRSDOS 1 3 Disk & Manual for Model III $ 23 

TRSDOS 2 3 Disk 8. Manual for Model I 23 

TRSDOS 6 » Disk & Manual for Model 4 29 

LDOS for the Model I or III ... .69 

NEWDOS 80 v2 for the Model I or III 129 

2-dnve cable for Model l/IH/4 24 

2-dnve cable for IBM PC 40 

4-drive cable for Model I 34 

Extender cable, 7" long 13 

5 25' power supply & encl . white or silver 59 

8' power supply, fan & enclosure, beige 159 

TRS-80 SPECIAL EQUIPMENT 



Holmes VID-80 Video and CP/M board for the Model III 
Comes complete with optional 64K RAM and CP/M 2 2 

No soldering required Easy installation $399 

LNW 32K Expansion Interface W/RS232 329 

12" Green Phosphor Monitor 79 

12" Amber Phosphor Monitor 84 

16K 200 nsec RAM Guaranteed 1 year (8 chips) 13 
64K 200 nsec RAM Guaranteed 1 year (8 chips) 64 
64K RAM plus Genuine PAL for Model 4 upgrade 74 



Complete with Manual 



Rose has developed this streamlined version of CP/M 2.2 that lets 
you run most of your favorite CP/M programs. They are in stock, 
ready to ship to you at this unprecedented low price. 



TRS-80 MODEL I 

DOUBLE DENSITY CONTROLLERS 

Add S3 slipping 

Aerocomp DDC" Really the best by test 

Aerocomp DDC with LDOS 

Aerocomp "DDC with NEWDOS 80-v2 
LNDoubler 5"/8" if you need 8' drives 



$99 
149 
189 
169 



S 16 

21 



MEDIA A SUPPLIES 

5 Oiskenes SSOD. Lifetin-e Guarantee Pk ot 10 

5" Diskettes DSOO Lifetime Guarantee Pack o» 10 

5 Fbpsort. holds 75 Diskettes 19 

8 Diskettes SSDO Lifetime Guarantee Pack ot 10 29 

8 Disketted DSDO Lifetime Guarantee Pack of 10 34 

8 Flipson holds 60 Diskettes 29 

5 25 or 8 Head Cleaning Kit 9 

Letter Sue 20 ID Tractor Paper. 2900 sheets 25 

LNW COMPUTERS 

THE LNW TEAM COMPUTER, 96K RAM 5 3MHz 
CPU speed High-Res B/W graphics H.gh-Res color 80 
x 24 video TRS-80 Model 1 . 3 and 4 compatible with 
the included Dosplus 4 Comes with CP/M 2.2 Has 
RS-232C, parallel printer and cassette pons Use both 
5 " and 8" drives 8088 CPU and MS-DOS options Full 
1 year parts and labor factory warranty This machine 
has everything you have ever dreamed of What are you 
waiting for? The list price of this fantastic unit is $ 
1,395 00 but Rose is going to give it to you for 

only $1,212 

Alette inouOe S'8 iw s*t<0P"nr; 

PRINTERS A ACCESSORIES 

ANADEX DP-9725, 240cps plus COLOR 1395 

PROWRITER 120cps, 10" Wide Friction/Tractor . 349 

PROWRITER 2, 120cps, 15" Wide Fnct/Trac 595 

STARWRITER F10-40cps Daisy Wheel 995 

LPRINTMASTER F10-55cps Fast Daisy Wheel 1299 

Rutishauser Bidirectional Tractor 199 

Rutishauser Sheet Feeder, A Best One 695 

A Good, Cheap Sheet Feeder for the F10 s 475 

SPECIAL SOFTWARE DEALS 

Add S4 shipping 

WordStar 3 3 (Specify MM or R/S format) $250 

MailMerg, SpellStar, Starindex 220 

WordStar Professional (Above 4 Progams) 450 

DataStar Data Entry & Retrieval 175 

ReportStar Report Generator 150 

InfoStar Advanced DBMS (Above 2 Programs) .300 

dBASE II Complete With Disk Tutorial 385 

Super Utility Plus 3 2 by Kim Watt 59 

CP/M 2 2 for Model 4 by Monte Zuma 199 

Pickles 8. Trout CP/M 2 2m for the Model 2-12-16 

Floppy Version 179 

Same thing but the Radio Shack Hard Disk 219 



Pledse add $5 handling charge to orders under $50 

ORDER NOW! 
TOLL-FREE 

800-527-3582 

Orders Only Please 

Call in your order or write to us at the address 
below. Texas residents call us at 214-337-4346 
and deduct $2.0X3 from your order but you 
should remind me 'cause sometimes I forget. If 
you need technical information or service please 
call the Texas number as the Toll Free lines are 
just for orders only. Prices are subject to change 
without notice and are mail order only. I accept 
AMERICAN EXPRESS, MASTERCARD and VISA 
and I will not charge your card until I ship your 
goodies. You can send a check or a money 
order. I also accept COO orders but they require 
cash or a cashier's check upon delivery. If 
shipping charges are not shown please call for 
the correct amount. Add $5.00 handling charge 
if your order is less than $50.00. Shipping 
charges quoted in this ad are for the lower 48 
states only. Orders to Canadian address add 
$20.00 Documentation Fee if order is $500.00 
or more. Texans add State Sales tax. No tax 
collected on shipments outside of Texas. Be 
sure you know what you are buying. 
SOFTWARE IS SOLD ON A REPLACEMENT 
BASIS ONLY - NO REFUNDS. If it is defective 
call us for instructions. Please order from me 
now — I need the money and I will not jack you 
around. All merchandise carries the original 
manufacturers' warranty and all repairs or 
adjustments will be made by the manufacturer 
or his designated representative. 
NEXT DAY SHIPMENT of Goods in Slock 

TOTAL ACCESS ,- 

P.O. Box 790276 
Dallas, Texas 75379 
214-337-4346 

Copyright 1984 by Total Access 

TRS 80 is a Trademark of the Tandy Corporation 

CP/M is a Trademark of Digital Research 



• See List of Advirtlstrs on Pag* 1 76 
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From Computer Plus to YOU . . . 
PLUS after PLUS alter PLUS 



N 


r=n= 


5 


Model 100 8K $49! 
1odel 100 24K $62 




Color Computer II 
w/64K Ext. Basic $205 




MODEL 4 16K $510 

MODEL 4 64K 

2 DISK & RS232 $1020 




DMP120 $385 
DMP200 $520 




Color Computer Disk Drive 
Drive $289 Drive 1 $220 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 




PRINTERS 




Model III/4 Drive 2 


259 


Model 4 Portable 




Silver Reed EXP400 D.W. 


309 


Model III '-4 Drive 3 


220 


64K 2 Drives 


1020 


Silver Reed EXP550 D.W. 


430 


Hard Disk M2000 


1525 


Pocket Computer 3 


89 


DWP410 


1159 


ETC. 




Pocket Computer 4 


59 


Gemini Powertype 


345 


CCR-81 Recorder 


52 


Model 2000 2 Drive 


2299 


CGP115 


159 


Cassette Tapes (10 Pk) 


9.95 


Model 2000 W'Hard Disk 


3599 


CGP220 Ink Jet 


545 


16K Ram Chips 


25 


Model 12 64K 1 Drive 


2360 


DMP110 


305 


64K Ram Chips 


62.95 


Model 12 64K 2 Drive 


2950 


DMP420 


735 


Model 4 64K Upgrade Kit 


79.95 


Model 16B 1Dr 256K 


3375 


Toshiba 1340 (24 wire head) 


779 


M100 Bar Code Reader 


89 


Model 16B 2Dr 256K 


3965 


Gemini 10X 


289 


64K Printer Butter 


199 


MODEMS 




Gemini 15X 


409 


Printer Stand 


25 


Hayes Smartmodem II 


215 


Panasonic P1091 


315 


Printer Cables 




Hayes Smartmodem 1200 


505 


Smith Corona Fastext 


190 


Printer Ribbons 




Novation Smartcat 1200 


410 


Prowriter 8510 


345 


Printer Paper 




Novation J-Cat 


115 


Okidata 


CALL 


Computer Books 




AC-3 


125 


Epson 


CALL 






DC Modem I 


89 


DISK DRIVES 




Radio Shack software 10% off 




DC Modem II 


160 


Model IN/4 Drive 


450 


Send for complete listing of 




DC Modem 2212 


315 


Model III 4 Drive 1 


195 


brand name software and hardware. 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 



com 




P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (617) 486-3193 



TRS-80 is a registered trademark of landy Corp 
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COMMUNICATIONS SOFTWARE 

MODEM — 8Q 

TRS-80 Model l/lll or TRS-80 Model 4 
FEATURES 

• I tie transfer* with »emote operation of TRS-SO Model I or III from a terminal or another THS-BO via modem 
— trar.jter files trym o' lo an unattended computer 

• Erro' free file trarsfets win another TRS 80 or a computer using the CP/M program "MODEM" used widely on 
computer Bulletin boards (CP ' M user Group disk *?S) 

• Configured tor use with MicroNet the Source, Forum 80 Redefine parameters, character set. control charac ■ 
tens to interface with Dow jones. WestLaw and other BBS Electronic mail capabilities 

• Written <r assembler code tor speed and minimum memory requirements, 1 10 to 9600 Dps Baud Rate Function 
Key Template NJuvice and Advanced Level Documentation, indei and Glossary 

BENEFITS 

• Handles files of unlimited length even in a 3?K system and ' disc dnve With the "XMODEM ' CMD ' utility, files 
may be transferred win a 16K computer 

• Prepare file oft line with word processor or included program "SAVE/ CMD" If first transmission attempt tails, 
data is still safely on disc and available for a second try 

• Open Transmit ' Receive iT / R| files before going on line Toggle T / R files On / Off independently in specialized 
application T / R diftereni files simultaneously Control codes for remote operations 

• Transmit single lines from a file allowing transmission lo be interallied with keyboard input, providing more 
•iprible response to prompts irom the remote Permits We transfer to a system that cannot accept lull speed 
transmission or does not use control codes to start/stop file transmission 

• DOS commands and programs which eiecule M the lower 16K may be executed while maintaining position in 
T ' R files Previous screen contents restored at completion of DOS command 

• Over 7000 satisfied users since 1981 

NEW ENHANCED Model 4 Version - 

Has ail l/lll features PLUS: 

• Menu prompted Configuration and Save To Disk lor i> Format options and /or Terminal Sellings 2) Code 
Ir»"siation Taoies for Transmit Receive. Video 4 Printer. 3i Control Code Table. *i Toggle On/Of options of 
Una Feed (accept /dropi. Send Slowly. 8 Receive Disk Buffer 51 Timed Character and /or Line Delay setting. 6i 
Sei Prompt Character 

• Specific Transmit/ Receive commands tor CP'M or MSOOS lent files 

• Utilize optional 64K RAM as Receive Buffer • System Status Lines 

BENEFITS: 

• Configurations easily defined Irom menu Load Irom disk individually or as a set lor specific Host protocol 
either liom withm program or on bootup 

• Permits compaiaOiiity with a vast array of computer networks and provides a high level ol customization 
including use ol your own encrypted codes 

• Downioao larger files from Bulletin Boards without losing data 

■ MOOEM SO is I00S Radio Shack compatible and is fully supported by the author Leslie Mikesea 



MOOEM 80 Model i / in sells tor only $39 95 - K 00 S4M 
MOOEM 80/ MAX (Lobo) sells lor only $49 95 - »2 00 S&H 
MODEM 80 Model 4 sells lor onl, $79 95 ■ $2 00 S&H 



COO Orders Require a $5 00 S4M 



A\ 



Available from 

ALTERNATE CHOICE 

j 9505 W Brown Deer Road 
/ Milwaukee Wi 53224 

/"» 1414)355-4544 

Dealer inquires Welcome 



COIWERT MOD III BASIC 
MOD 4 1 1 OUT TANDY 8000 

If you own a TRS-80 Mod III and have resisted upgrading to the 
TRS-80 Mod 4, IBM PC. or Tandy 2000 because your soltware 
would not be compatible, good news has finally arrived. EMSI 
offers 3 powerful utilities for converting your Mod III BASIC 
programs to run on any of these new machines. 
The programs are menu driven, very easy to use and automatically 
translate 95% or more of even your largest BASIC programs in 
just a few minutes. They insert all required spaces between 
keywords recalculate PRINT * addiesses (or replace them with 
LOCATES), adiust TAB addresses, correct exponentiation symbols, 
eliminate unnecessary spaces, remove down arrows, optionally 
remove REM s. and flag and list unresolved line numbers. User 
guides explain program operation in complete detail, offer 
alternatives for revising lines that need manual intervention and 
numerous hints for easier, more thorough conversions 

CONV3T04 

CONV3TOPC 
CONV3TO2000 



Converts TRS-80 Mod III BASIC fo S 49 95 
TRS 80 Mod 4 

Hundreds o' satisfied users Ask to see program 
■ ■ ""Be stars! at your IOC8I R.iriir SftKtl 
Center 



NEW! Converts TRS 80 Mod III BASIC 
to IBM PC" 



NEW! Converts TRS 80 Mod III BASIC 
to Tondy 2000* 



S139.95 
S139.95 



•includes convenient diskette formatter and f/to tranafet program so '.hat 
programs and tiles may be exchanged between machines without modems 

Diskettes and guides are packaged in deluxe three ring binders Use' Guides 
available separately for those who want complete details before ordering 
entire package tSb-00 cash or MO only, credited to subsequent package order) 

TO ORDER CALL NOW - TOLL FREE (Except NJI 
800 922 0786 

NJ residents and local dealers: 201-879-5982 

EDUCATIONAL MICRO SYSTEMS, Inc. 

^^ PO Box 471 Chester. New Jersey 07930 ^^ 

_ [JEAIFR INQUIRIFS INVlTfD €»P 

Terms: VISA Mastercard. MO. check, or COD Orders shipped within 24 
hrs Add S3 00 shipping/handling Add 51,65 for COD. Foreign or first class, 
add first class postage (package wt 2 1 1A Ihs i NJ residents add 6% sales tax. 



TRS-80" "CAN YOU BUY DIRECT? 



WILL YOU PAY TOO MUCH? 



MODEL 4 128K 2 DRIVES 



Ask About Our 

"30 DAYS 

Buy- Back- Policy" 



MODEL 12 768K 2 DRIVES 

wmmm 

MODEL 16B 768K 1 DRIVE 
PLUS 15 MEG HARDDRIVE 
(BUILT-IN) I 




TM TRADE MARK 
OF RADIO SHACK 
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Located 30 miles from Fort Worth) 
GRANBURY • NR FORT WORTH, TEXAS 76048 

TOLL FREE NUMBER: 1 800-433-S-AV-E 

Monday thru Friday — 9:00 a.m. to 5:00 p.m. Texas Time 
(Order Inquiries/Customer Service &) IN TEXAS: 817-573-4111 




Editext combines the simplicity of a full- 
screen editor with the efficiency of a line 
editor in only 2K of memory. 



Hybrid Vigor 



f, for one rea- 
son or another, 
you're dissatis- 
fied with your 
present Model 
III text editor, you might find Editext 
the perfect alternative — it's written in 
machine language, takes only a few 
minutes to learn, and uses only 2K of 
memory. 

Defining an Editor 

An editor lets you enter and correct 
data before processing it. Essentially, 
two types of editors are available: a 
full-screen editor and a line editor. A 
full-screen editor, like that in Scripsit, 
lets you move the cursor anywhere on 
the screen to insert text or correct mis- 
takes. Such an editor makes no dis- 
tinction between lines, as it treats the 
entire document as one unit. 

In contrast, a line editor, such as the 
editor in Basic, treats each line as a 
separate entity, delineated by a line 
number. To correct a mistake, you 
specify the appropriate line and make 
corrections within that line only. 

Learning to use a line editor is gen- 
erally easier than learning a screen edi- 
tor, but it's much slower. This is espe- 
cially true when you have to make a lot 
of corrections. However, the line edi- 
tor is more efficient when you edit a 
program because you're making cor- 
rections to a specific portion of the 
program only, rather than to the file as 
a whole. As a result, the editor saves 
just the corrections back to disk, in- 
stead of the entire file. 

Editext 

Editext offers the best of both 
worlds by combining the power of a 
full-screen editor with the simplicity of 
a line editor. With Editext, you can 



move the cursor anywhere on the 
screen, but affect only one line. 

Because Editext saves all text in 
ASCII format, you can use it in con- 
junction with Basic and Scripsit, as 
well as with many other programs. 
Editext is excellent for editing pro- 
grams, storing recipes and phone 
numbers, displaying messages, or ex- 
amining disk files. 

In addition, you could easily apply 
Editext to a communications pro- 
gram. You can use it to edit a file be- 
fore sending it over your modem. 

Using Editext 

Editext is as easy to use as it sounds. 
You boot up Editext directly from 
DOS Ready and you're ready to pro- 
cess text. Type your text directly onto 
the screen or execute any one of the 
seven commands by hitting control 
(the shift and down-arrow keys) to- 
gether with the first letter of the com- 
mand (see the Table). In addition, the 
four arrow keys let you position the 
nondestructive cursor anywhere on 
the screen. 

The program itself is short and eas- 
ily understood. The main routine, 
KBOARD, blinks the cursor until it 
receives a character from the key- 
board. If the character represents a 
command, it jumps to the appropriate 
command, rather than display the 
character on-screen. 



by Theodore Diament 

The routines for each command can 
stand alone. They will all return to the 
routine that calls them. For example, 
the routine SASC saves the text to an 
ASCII disk file using a rarely publi- 
cized ROM routine. 

Regardless of the application, you'll 
find Editext to be a helpful and handy 
editor. ■ 



You can reach Theodore Diament 
at 148 Wellington Ave., New Ro- 
chelle, NY 10804. 



Command 


Definition 


Open 




Opens a space for inserting a 
character 


Delete 




Deletes a character on a line 


Line 




Creates a new blank line 


Kill 




Deletes an entire line 


Print 




Sends text to line printer 


File 




Saves or loads text on disk 


Quit 




Exits Editext 




Table 


. Editext commands. 



The Key Box 

Model III 
32KRAM 
Editor/ Assembler 
Disk Drive 



LOAD 80 



Program Listing. Editext, a machine-language text editor. 



00100 ; 

00110 ; Text Editor Written By Theodore Diament 

00120 ; 

00130 ; Version 1.1 With Disk Save Routine 

00140 ; 



Listing continued 
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1 isting continued 












00150 


; 










00160 


; 










00170 


BB6IM 


EOU 


5200H 


iSND OF TRSDOS 




00180 


TXTBEG 


EQU 


BEGIN 


; BEGINNING OF TEXT 




ouiyo 


TXTPOS 


EQU 


BEGIN+2 


.•POSITION ON LINE OF TEXT 




1 g 1 1 ,i 


TXTEND 


EQU 


BEGIN+4 


;END OF TEXT 




00210 


BEGLIN 


EQU 


BEGIN+6 


; START OF LIME OK IBXI 




00220 


sen in 


EQU 


BEGIN+8 


.•SCREEN POSITION OF LINE 




1 1 2 i 1 


SCREEN 


EQU 


BEGIN+10 


;TEXT ON TOP SCREEN LINE 




00240 


CCHAR 


EQU 


BBGXR+12 


; CURSOR CHARACTER 




00250 


CHAR 


EQU 


BEGIN+14 


; KEYBOARD INPUT CHARACTER 




1 1 J ( I 


Tl.ML 


EQU 


BBGIM+16 


(TIME OP CURSOR BLINK 




19271 


STORE1 


BQD 


BEGIN+18 


; DUMMY STORAGE LOCATION 




00280 


STORE2 


EQU 


BEGl: 


; DUMMY STORAGE LOCATION 




■02 Ifl 


STACK 


EQU 


BEGIN+90 


; STACK POSITION 




00300 


BUFFOS 


EQU 


UEGIN+92 


;DISK BUFFER POSITION 




00310 


BUFFER 


EQU 


BEGIN+100 


;256 BYTE DISK BUFFER 




00320 


DCB 


EQU 


BBGXM+356 


;50 BYTE DATA CNTRL BLOCK 




00330 




ORG 


BFGIK+406 


; EXECUTION LOCATION 




00340 




JP 


START 


;SKIP OVER MESSAGES 




00350 


HELP 


DEFM 


'Open Delete 


Line Kill Print ' 




1034 ,' 




DEFM 


"File Quit* 






00370 




DEFB 


3 






00380 


DISK 


DEFM 


■Save to disk 


ot Load from disk?' 




00390 




DEFB 


3 






00400 


SPEC 


DEFM 


'Enter File Specification -: ' 




00410 




DEFB 


3 






00420 


TITLE 


DEFM 


■JAX by Theodore Diament (c) 1983.' 




00430 




DEFB 


3 






00440 


START 


CALL 


WIT 


{INITIALIZE VARIABLES 




00450 




LD 


HL,BEGIN+83FH 


;GET TEXT END 




00460 




LD 


(TXTEND) ,HL 


; STORE IT 




00470 




CALL 


CLS 


,-CLEAR THE SCREEN 




00460 




CALL 


CLEAR 


.•CLEAR LAST SCREEN LINE 




00490 




LD 


DE, TITLE 


.•POINT TO TITLE 




00500 




CALL 


MESAGE 


.-DISPLAY TITLE 




00510 




CALL 


KBRD 


;WAIT FOR A CHARACTER 




10521 




CALL 


HELPER 


; DISPLAY COMMANDS 




00550 


K BOARD 


LD 


SP, STACK 


.•CLEAR STACK 




00560 




CALL 


KBRD 


;WAIT FOR A CHAR 




00570 




LD 


HL,KBOARD 


;GET RETURN POSITION 




00580 




PUSH 


HL 


;PUT IT ON STACK 




00590 




CP 


9 


;IF RIGHT ARROW 




00600 




JP 


Z, RAROW 


; THEN MOVE RIGHT 




00610 




CP 


8 


;IF LEFT ARROW 




00620 




JP 


Z , LAROW 


; THEN MOVE LEFT 




00630 




CP 


4 


> IF CONTROL 'D' 




006 40 




JP 


Z, DELETE 


; THEN DELETE A CHAR 




00650 




CP 


15 


;IF CONTROL 'O' 




00660 




JP 


Z,OPEN 


;THEN INSERT A SPACE 




00670 




CP 


10 


> IF DOWN ARROW 




006 80 




JP 


Z , DAROW 


; THEN MOVE DOWN 




006 90 




CP 


0DH 


;IF ENTER KEY 




00700 




JP 


7. , DAROW 


j THEN CARRIAGE RETURN 




00710 




CP 


91 


;IF UP ARROW 




00720 




JP 


Z,UAROW 


) THEN MOVE UP 




00730 




CP 


11 


;IF CONTROL 'K' 




00740 




JP 


Z,KILL 


» THEN KILL A LINE 




00750 




CP 


12 


;IP CONTROL •L" 




1 1 1 1 1 




JP 


Z.LINE 


; THEN INSERT A LINE 




00770 




CP 


27 


}1F CONTROL 'T' 




00780 




JP 


Z.TOP 


; THEN GO TO TOP OF TEXT 




00790 




CP 


16 


,-IF CONTROL *P' 




00800 




JP 


Z, PRINT 


; THEM SEND TO PRINTER 




00810 




CP 


6 


;IP CONTROL ' F' 




00820 




JP 


Z,FILE 


; THEN FILE ON THE DISK 




00830 




CP 


17 


.•IF CONTROL "Q" 




00840 




JP 


S.402D8 


; THEN RETURN TO TRSDOS 




00850 




CP 


32 


j IS IT A BAD CHAR 




00 860 




RET 


M 


; RETURN IF IT IS 




008/0 




LD 


HL, (BEGLIN) 


;GET LINE OF TEXT 




00 880 




CALL 


POS 


;FIND CHAR POSITION 




00890 




LD 


A, (CHAR) 


;GET INPUT CHARACTER 




00900 




LD 


(HL) ,A 


;PUT CHAR IN RAM 




00910 




CALL 


RAROW 


;MOVE CURSOR RIGHT 




00920 




JP 


COPY 


.-COPY RAM TO SCREEN 




00930 


RAROW 


LD 


A, (TXTPOS) 


jGET CURSOR POSITION 




00940 




CP 


63 


| IF AT RIGHT MARGIN 




00950 




RET 


Z 


; THEN RETURN 




00960 




INC 


A 


.-ELSE BUMP CURSOR POS 




00970 




JR 


LI 


.•STORE CURSOR POS 




00980 


LAROW 


LD 


A, (TXTPOS) 


.•GET CURSOR POSITION 




00990 




OR 


A 


}IF AT LEFT MARGIN 




11000 




RET 


Z 


; THEN RETURN 




01010 




DEC 


A 


;ELSE MOVE POS LEFT 




01020 


LI 


LD 


(TXTPOS) ,A 


;STORE THE POSITION 




01030 




RET 








I 1 | .1 ,' 


DELETE 


CALL 


COUNT 


;GET NUMBER OF CHAR 




01050 




LD 


HL, (BEGLIN) 


.-GET START OF LINE 




01063 




CALL 


POS 


;GET ADDRESS OF CURSOR 




01070 




PUSH 


HL 


; TRANSFER IT TO DE 




01080 




POP 


DE 


; DE-CURSOR ADDRESS 




01090 




INC 


HL 


;HL=ONE ADDRESS TO RIGHT 




01100 




LDIR 




{SCROLL THE TEXT 




01110 




JP 


BLANK 


>PUT A BLANK IN LAST POS 




01120 


OPEN 


CALL 


COUNT 


.-GET NUMBER OF CHARS 

Listing 


continued 



J7,e 

Master 
Handicapper 



\\\ 



^w 



EVALUATES FROM RACING FORM! 

Age Gender Poji (Today) 

Class Jockey (Today) Post (Last) 

Condition Jockey ILact) Spaed 

Consistency Length Trainer 

Earnings Tune ol Year Workouts 

And givet you GRAPHIC REPRESENTATION ol finish 



'sFfF 



PROGRAM 
GLD Thoroughbred Gold Edition™ 
A Full" leatured thoroughbred analysis designed tor me proles 
sionaJ and serious novice $159 95 ■ >'n-! -•- 

EGLD. Enhanced Gold Edition™ 

:■■..> •'!•. poaajfdi prearaa * i :. . 
and scores lo the t»t analysis win a single Keystroke " 

(Master Bettor TM .ncluded) $199.95 complete 

GLTD. Limited Gold"™ 

Enaoies Professional Handicappers 10 assign specific values 10 the 
racing vaiiables thev 'eel eie important 

PROFESSIONAL HANDICAPPING SYSTEMS 

** <• 4l 

Age 5 

Cass <S 

Condition 10 

Earnings S 

I OS ts Everything OK (Y'N) 

Create program weight based on a particular track and tine tune it 
■-■• meiimum *.n percentage This program is designed lor ease 
ot use The user needs no programming enpertence 

(contains Integrated Bettor TM| $299.95 complete 



GD Gold Dog Analysis™ 

The only professional dog handicapper on the market, includes 

1) Speed 6| Condition 

2) Post Today 7) Running Style 

3) Kennel Bi Weight 

4) Post Last 9| AM new internal weighting 

5) Distance 101 NEW class indicator 

It you are near a greyhound track you can ; afford not to use (his 

P°9"™ $149.95 complete 

(with integrated Master Bettor™) $199.95 



Consistency '5 


Speed 10 


Jockey '5 


Workouts 


Tramer S 


T,me oi Year 


Post to 


Consistency 5 






MHH Waster Harness Handicapper™ 

Professorial sohware designed to provide a thorough analysis of an 
trotter ano pace/ races ** North America and Canada Features 
Class Post Positions Time Finish 

Dnver Track Conditions Time Last Quarter 

Days Since Last Trainer Track Rating 

Gender Time'* Temp Allowance 

w/miegrated Mastei BettorTM $199.95 



$159.95 complete 

PPX Professor Jones' Football Predictor, Pn 
Complete FootDai 1 Analysis witn Data- Base 
1) Overlays 4) OverfUnder bets 

?) Point Spreads 5) Oata Base Stats 

3) Super Plays 6) Molds 100 teams 

Highest percentage ot winners 1983 $39-95 compiele 

$99.95 with Data Base Management 



e, 



$$ 



MB Master Bettor™ 



A compliment to ALL Mastei Handicapper programs includes 
'i vvrvPate'Sriow 4) Tnfecta 7) Money Management 

,'i Qj ■ i 5) Pik Si- 8) Odds Analysis 

t • i i.i 6) Daily Double 9) and Much More 

A pertec- program designed to use results trnm all Master Programs 
lo generate best bet 559.95 Lomplele 



Model 100 Portable Systems 

TPl-Thoroughbred/PaceTM (24K) 
DG < -Master Dog AnalysisTM ,24K) 



$99.95 complete 

$99.95 complete 



LNW Computers 

Call for Lowest Prices 



Sena check ' -noney order ' VISA I Maste'Ca'd 



Prof. Jones 
1114 N. 24th St. 
Boise, ID 83702 



* See List ol Adwrtlstrs on Pag* 1 76 



(Include expiration datel to 

• 449 Tf ^P 

TELEPHONE 
(208) 342-6939 

TERMS. FREE SHIPPING ALL SOFTWARE 
Add $6.00 hardware / CO D. Add S6.00 I Add 3 
Aeeks personal checks . Add 4 5*; ID res dents i 
Add $600 outside US A I Puces subject to change 



BROCHURE AVAILABLE 
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ULTIMATE 

PORTABLE 

MODEM 

Lap Computers 

Portables 

Terminals 

Home Computers 




214/458-8094 



Centronics, Inc. 

13613 Neutron 
Dallas, TX 75234 ..mc 

COD. and checks accepted. 
Add $3.00 per unit for shipping 
and handling. Add $10.00 for 
battery pack option. 

Detach and Return 



Name 



Address 



City _ 
State 



Zip- 



Listing continued 










01131 




LD 


HL, (BEGLIN) 


;GET START OF LINE 


01140 




LD 


DE,63 


; LENGTH OF LINE 


01150 




ADD 


HL,DE 


(HL-ADDRESS OF R-MARGIN 


01160 




PUSH 


HL 


; TRANSFER IT TO DE 


01170 




POP 


DE 


jDE-RIGHT MARGIN 


• 1180 




DEC 


HL 


;HL-ONE TO THE LEFT 


01190 




LDDR 




; SCROLL THEN LINE 


ii i . c ;< 




JP 


BLANK 


;PUT BLANK IN LAST POS 


01210 


DAROW 


CALL 


DTXT 


; INCREASE BEGLIN BY 64 


01220 




CALL 


DSCN 


j INCREASE SCNLIN BY 64 


01230 




LD 


A, (CHAR) 


;GET INPUT CHARACTER 


01240 




CP 


IM 


(IP IT IS CARRIAGE RETURN 


01250 




RET 


NZ 


; NO IT IS NOT. SO RETURN 


01260 




LD 


A.0 


; YES IT IS. SO 


01270 




LD 


(TXTPOS) ,A 


; MOVE CURSOR TO L-MARGIN 


01280 




RET 






01290 


UAROW 


CALL 


UTXT 


.•DECREASE BEGLIN BY 64 


■' | 1 1 ,i 




JP 


USCN 


;DECREASE SCNLIN BY 64 


01310 


KILL 


CALL 


NUMBER 


;GET NUMBER OF CHAR 


01320 




LD 


DE,(BEGLIN) 


(GET CURRENT LINE OF RAM 


•1330 




LD 


HL,64 


;ADD 64 


01340 




MX) 


HL.DE 


(SOURCE-1 LINE DOWN 


01350 




LD 


DE, (BEGLIN) 


•DESTINATION-CURRENT LINE 


01360 




LDIR 




; SCROLL THE TEXT 


01370 




LD 


IX, TXTEND 


j GET THE END OF TEXT 


01380 




CALL 


SUB 


; DECREASE BY 6 4 


01390 




JP 


DITTO 


;COPY TO SCREEN 


01480 


LINE 


CALL 


NUMBER 


;GET NUMBER OF CHAR 


01410 




LD 


HI., 64 


.•MUST SCROLL ANOTHER LINE 


01428 




ADD 


HL,BC 


;HL=NUMBER OF CHAR 


01430 




PUSH 


HL 


; TRANSFER HL 


01440 




POP 


BC 


;TO BC-NUMBER OF CHAR 


01450 




LD 


HL.(TXTEND) 


; SOURCE-END OF TEXT 


01460 




PUSH 


HL 


; STORE IT 


01478 




LD 


IX,TXTEND 


;GET END OF TEXT 


014 88 




CALL 


ADD 


.•EXTEND IT ONE LINE 


01490 




LD 


DE, (TXTEND) 


; DESTINATION-NEW TEXT END 


01500 




POP 


HL 


.•RETRIEVE SOURCE 


01510 




LDDR 




;CREATE A NEW LINE 


01520 




CALL 


CLEAR 


j CLEAR THE NEW LINE 


01530 




JP 


DITTO 


;COPY TO SCREEN 


01540 


PRINT 


LD 


HL, (BEGLIN) 


jGET CURRENT LINE 


.n M 


P0 


LD 


C,57 


.-GET PAGE LENGTH 


01560 


PI 


LD 


B,8 


;L-MARGIN=8,R-MARGIN=7 2 


01570 


P3 


LD 


A,' ' 


;SEND CODE FOR SPACE 


01580 




CALL 


3BH 


;ROM LINE PRINT 


01599 




DJNZ 


P3 


,-LOOP TILL DONE 


• 16*0 




LD 


B,64 


.•COUNT FOR ONE LINE 


• 1610 


P2 


LD 


A,(HL) 


;GET THE CHARACTER 


01620 




CALL 


3BH 


.-SEND TO PRINTER 


■ 1630 




INC 


HL 


j BUMP CURRENT CHARACTER 


01640 




DJNZ 


P2 


.•LOOP TILL DONE 


01650 




LD 


A,0DH 


; CARRIAGE RETURN 


01660 




CALL 


3BH 


.•SEND C/R TO PRINTER 


• 1670 




LD 


(STORED ,HL 


(STORE CURRENT TEXT POS 


01680 




LD 


DE, (TXTEND) 


(GET TEXT END 


• 1690 




CALL 


SBC 


j IF WE ARE AT THE END 


• 1700 




RET 


P 


( THEN RETURN 


11711 




LD 


HL, (STORED 


; ELSE GET POSITION 


■ 1720 




DEC 


C 


;IF NOT AT END OF PAGE 


• 1730 




JR 


NZ,P1 


(THEN LOOP 


• 1740 




LD 


B,8 


(COUNT- 8 


• 1750 




LD 


A,0DH 


(GET CARRIAGE RETURN CHAR 


01760 


P4 


CALL 


3BH 


(SEND TO PRINTER 


• 1770 




DJNZ 


P4 


;FORM FEED PRINTER 


• 1780 




JR 


P0 


(LOOP TILL DONE 


01790 


TOP 


CALL 


INIT 


(GET INITIAL VALUES 


• 1800 




JP 


DITTO 


(DISPLAY FIRST SCREEN 


01810 


NUMBER 


LD 


HL, (TXTEND) 


(GET END OF TEXT 


• 182B 




LD 


DE, (BEGLIN) 


;GET CURRENT LINE 


01830 




CALL 


SBC 


(FIND THE DIFFERENCE 


01840 




LD 


DE,63 


(SUBTRACT 63 


01850 




CALL 


SBC 


(IF WE ARE ON LAST LINE 


01860 




JP 


Z.KBOARD 


,• THEN RESTART 


01870 




PUSH 


HL 


; ELSE TRANSFER HL 


01880 




POP 


BC 


( TO BC-NUMBER OF CHAR 


01890 




RET 






01900 


DTXT 


LD 


IX, BEGLIN 


;GET CURRENT LINE 


• 1910 




CALL 


ADD 


(MOVE DOWN ONE LINE 


01920 




LD 


DE, (TXTEND) 


(GET END OF TEXT 


01930 




CALL 


SBC 


(IF WE DID NOT EXCEED END 


01940 




RET 


M 


( THEN RETURN 


01950 




LD 


IX, TXTEND 


; ELSE GET END OF TEXT 


• I960 




CALL 


ADD 


(EXTEND IT ONE LINE 


01970 




JP 


CLEAR 


jCLEAR THE NEW LINE 


01980 


UTXT 


LD 


HL,(TXTBEG) 


(GET START OF TEXT 


01990 




LD 


DE, (BEGLIN) 


(GET CURRENT LINE 


02001 




CALL 


SBC 


;IF WE ARE AT THE TOP 


02010 




JP 


Z , KBOARD 


; THEN RESTART 


02020 




LD 


IX, BEGLIN 


; ELSE GET CURRENT LINE 


02030 




JP 


SUB 


( MOVE IT BACK ONE LINE 


02040 


DSCN 


LD 


HL,(SCNLIN) 


.-GET CURRENT SCREEN LINE 


02050 




LD 


DE, 16192 


jGET LAST SCREEN LINE 


02060 




CALL 


SBC 


(IF WE ARE ON LAST LINE 


02070 




JP 


Z,DSCREN 


; THEN MOVE DOWN SCROLL 


02080 




LD 


IX.SCNLIN 


( ELSE GET SCREEN LINE 

Listing continued 
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XENIX 

MULTI-USER SOFTWARE 




WE HAVE THE ANSWER! 

MODEL 16 TRS-80 ACCOUNTING 



ALSO AVAILABLE AS 
SINGLE-USER FOR 
THE MODEL E & 12 

NEED SOMETHING 
SPECIAL' 



CALL US! 



■ OP SE« 
'h£ PROGBA" 




Xlb BLibINt bb 
OOATFS 



• ACCOUNTS RECEIVABLE 

• GENERAL LEDGER 

• INVENTORY/INVOICING 



$595 EACH 



• ACCOUNTS PAYABLE 

• PAYROLL 

• JOB COSTING 

;>if|( ATIONS ARE availaBIEi 



& 






MANUFACTURING INVENTORY $995 



m 



THE PROGRAMMER & ASSOCIATES. INC 

10802 FOREST LANE SUITE 110 

DALLAS. TEXAS 75243 

1-214-341 9874 *' 248 



1 «\ ., 




WELSH SYSTEM'S "BLACKJACK TUTOR" will teach you basic 
Blackjack strategy along with a simple card counting system. With 
just a few hours a week practice you will be able to play and 
win in both Atlantic City and Las Vegas Casinos. 

BLACKJACK TUTOR features 4 skill levels so you learn the same 
techniques professionals use in an easy step by step fashion. Strategies 
for I. 2. 4 or 6 deck games are included. You can even design 
your own system, if you wish 

START WINNING NOW. ORDER TODAY! 
(For Model III & IV. I disk required Write for availability dates on other models / 



SPECIAL 

$49. 95 

(On Orders received 
IS) 



before Nov 
REGULAR 
PRICE 



$69 



WELSH SYSTEMS 



ORDERS: 

P.O. BOX 64 
EASTON, PA 18042 
Please Add $2 
Shipping & Handling 
PA Res add 6% sales tax 



INFORMATION: 

60 N. 3rd Si. 
Easton. PA 18042 
(215) 250-8801 

^8' 



►- See List of Advertisers on Page 176 



PROGRAMMING TOOLS 
FOR YOUR TRS-80® 



INSTANT ASSEMBLER 

The INSTANT ASSEMBLER Is a powerful machine language development system for the 
TRS 80 One program contains the editor, assembler, and debugger It allows you to 
assemble directly to memory and immediately debug your programs with the built m single 
stepping debugger Quickly switch from assembler to debugger and back again without 
losing the source code This feature makes INSTANT ASSEMBLER an excellent learning 
tool for the beginner and a super fa»t development system for the experienced programmer 
INSTANT ASSEMBLER has many other unique features It detects syntax errors as source is 
entered and stores Its source In a compressed format that uses only 40% as much memory as 
other assemblers It is Incredibly fast and will assemble 10K of ob)ect code in )ust 8 seconds It 
will also create relocatable code modules that can be saved on disk or tape and linked 
together for very large or modular assemblies INSTANT ASSEMBLER comes with a 
comprehensive 65 page instruction manual and Is available In several versions for different 
machines The CP'M version does not run on all machines so Inquire before ordering 

TAPE INTASM 2.1 for Model 1 and 3 $39 95 

DISK INTASM 2.1 for Model 1 and 3 $49.95 

DISK INTASM 3.0 for Model 4 $69 95 

DISK INTASM 3 for CP M $69 95 

INSIDE LEVEL II 

This book Is a comprehensive reference guide to the Model 1 and Model 3 ROMs which 
allows the machine language programmer to easily utilize the sophisticated routines they 
contain Concisely explains set-ups. calling sequences, and vanable passage for number 
conversion anthmeOc operations, and mathematical functions, as well as keyboard tape 
and video routines In addition, the 18 chapters include a large body of other information 
useful to the programmer 80 Micro said "The book has no flaws: it is a perfect gem " Byte 
Magazine said 'I recommend this book to serious machine language programmers " 
INSIDE. LEVEL U $15.95 

DEMON DEBUGGER 

DEIMON (for DEbugger and MONltor) is a sopl t ii. I tool *ith which you can explore and 
debug machine language programs The STEP mode h,!5 IS* different commands and will 
step through machine language programs one instruction at a time, showing you the address 
hexadecimal value, Zilog mnemonic, register contents, and step count for each instruction 
Thi' MONITOR mode has 26 different commands including a labeling disassembler 
DEMON Is available on tape or disk and Includes a comprehensive 40 page manual with 
many examples 

DEMON 1.0 for Model 1 and 3 $39.95 

DEMON 2 for Model 4 $39.95 

DISK INDEX 

DISK INDEX will assemble an alphabetized index of every disk In your collection Simply put 
each disk in the computer one after another and DISK INDEX will quickly read the program 
names and free space left It will recognize any DOS and disk density (except CP'Ml and 
catalog disks lor the Model 1 3 and 4 The whole index or any selected pan may be 
displayed on the screen or printed on paper in several different formats Display modes 
include programs grouped by disk name, by program name, disks in order of decreasing free 
space and by program showing the number of backup copies of each one The Index Itself 
may be stored on disk for future access and update A 48K machine will hold up to 255 disks 
ot over 2000 programs in each file, and you can create as many files as you need DISK 
INDEX comes with a comprehensive 28 page instruction manual 
DISK INDEX 3.2 for Model 1. 3. or 4 $39 95 

TELCOM 

Mumford Micro offers two telecommunications programs. TELCOM I has most of the 
features needed to communicate with bulletin boards, time share systems, or for file transfers 
between two disk- based micros over modems or direct wire It Is menu driven and extremely 
simple to use TELCOM II is an enhanced version of this program, which also supports the 
LYNC protocol which will automatically detect and correct errors in transmission Files can be 
sent to or fetched from an unattended computer The Instruction manuals lor both programs 
are available separately for $5 to help you decide which program is best suited to your needs 

TELCOM I for Model 1. 3. or 4 $39 95 

TELCOM II for Model 1 or 3 $69 95 

MODEL I SPEED UP 

The SK-2 is a hardware modification for the Model 1 that allows CPU speeds lo be increased 
by 50% or 100% Speeds may be changed with a toggle switch (not Included) or on software 
command It can also be configured to return to normal speed any time a disk is active It 
mounts Inside the keyboard unit with only 4 necessary connections and is easily removed if 
the computer ever needs service The SK-2 has been field proven by 3 years of use. and 
comes fully assembled with socketed IC's. 
SK-2 $29.95 



ORDERING. Ten day money back guarantee. Include $2.50 for postage and handling. 
California residents add 6% sales tax. \A*a. MasterCard and COD orders arrepted 
SPFCIFY MODFl NUMBFR Dealer inquiries invited. 

MUMFORD MICRO SYSTEMS 

Box 400-E Summerland. California 93067 (805) 969-4557 
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Computer 



Tutor 




VIDEO INSTRUCTION 

TAPES! 

STEP BY STEP 

INSTRUCTIONS 

USE YOUR VCR SIDE BY SIDE 
WITH YOUR COMPUTER TO 
LEARN HOW TO PROGRAM, AND 
HOW TO USE PROGRAMS. YOUR 
VCR ALONG WITH YOUR COM- 
PUTER SERVE AS YOUR PERSONAL 
TUTOR. PAUSE YOUR VCR TO RE 
VIEW AND LEARN AT YOUR OWN 
PACE. 

CAT# TOPIC APPROX PRICE 

TAPES FOR THE TAS80 MODEL 1 3. 4, 



OOS-I 


TRSDOS 1 3 


90 MIN 


$3995 


DOS-6 


TRSDOS 6 


105MIN 


$39 95 


D0S-3 


NEWDOS 80 


105MIN 


S39 95 


DOS-2 


DOSPLUS 3 5 


• ■■ V "J 


S39 95 


DOS-5 


LDOS 


105MIN 


$3995 


DOS-7 


CPM2 2 
MONTEZUMA 


105 MIN 


$3995 


D0S-4 


MUITIOOS 


105 MIN 


$39 95 


EW-1 


VISICALC 


90 MIN 


$3995 


EW-7 


MULTIPLAN 


90 MIN 


$3995 


WP-1 


LAZY WRITER 


105 MIN 


$39 95 


WP-2 


SUPERSCRIPT 


105 MIN 


$39 95 


WP-3 


SCRIPTSIT 


90 MIN 


$39 95 


WP-4 


NEWSCRIPT 


105 MIN 


$39 95 


DB-I 


PROFILE III PLUS 105 MIN 


$39 95 


OB-2 


PFSFILE 


90 MIN 


$39 95 


DiO-3 


TRSDOS 1 3 
DISK l-O 


105MIN 


$39 95 


DI0-4 


TRSDOS 6 
DISK I/O 


105 MIN 


$39 95 


BP-1 


LEARNING MOD180MIN 


$49 95 




3 4 BASIC 






BP -2 


LEARNING MOD180MIN 


$49 95 




ONE BASIC 






TC 1 


MTERM 


45 MIN 


$29 95 


UT-1 


DOTWRITER 


75 MIN 


$29 95 



VHS or BETA 
FORMAT 

Add S3. 00 per order for 

shipping and handling. 

Add S3. 00 for CO. D. 

VI&A 

TO ORDER PHONE or WRITE 

LYNN COMPUTER SERVICE 

6831 West 157th Street 
Tinley Park. Illinois 60477 

(312)4291915 ^H5 
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02090 


JP 


ADD 


.•EXTEND IT ONE LINE 






02100 USCN 


LD 


HL, (SCNLIN) 


;GET SCREEN LINE 






02110 


LD 


DE,3C00H 


;GET TOP LINE 






02120 


CALL 


SBC 


;IF WE ARE AT TOP LINE 






02130 


JP 


Z, USCREN 


;THEN SCROLL THE SCREEN 






02140 


LD 


IX, SCNLIN 


; ELSE GET SCREEN LINE 






02150 


JP 


SUB 


;MOVE IT BACK UP ONE LINE 






02160 DSCREN 


LD 


IX, SCREEN 


;GET THE SCREEN POINTER 






02170 


CALL 


ADD 


jMOVE IT DOWN ONE LINE 






02180 


JP 


DITTO 


;COPY TO SCREEN 






02190 USCREN 


LD 


IX, SCREEN 


,GET SCREEN POINTER 






02200 


CALL 


SUB 


;MOVE IT BACK UP ONE LINE 






02210 


JP 


DITTO 


;COPY TO THE SCREEN 






02220 ADD 


LD 


HL,0019H 


;ADD HL,DE INSTRUCTION 






02230 


JR 


ARITH 


;PERFOR ARITHMATIC 






02240 SUB 


LD 


HL,052EDH 


;SBC HL,DE INSTRUCTION 






02250 ARITH 


LD 


(INST) ,HL 


.•PROGRAM THE INSTRUCTION 






02260 


LD 


DE,64 


;GET LENGTH OF A LINE 






02270 


LD 


H,(IX+1) 


;GET MSB 






02280 


LD 


L,(IX) 


•GET LSB 






02290 


OR 


A 


; CLEAR CARRY 






02300 INST 


SBC 


HL,DE 


; PERFORM ARITHMATIC 






02310 


LD 


(IX+1) ,H 


; STORE MSB 






02320 


LD 


(IX) ,L 


; STORE LSB 






02330 


RET 










02340 SBC 


OR 


A 


.•CLEAR CARRY 






02350 


SBC 


HL,DE 


; SUBTRACT 






02360 


RET 










02370 POS 


LD 


D,8 


.•MSB-0 






02380 


LD 


A,(TXTP0S) 


;GET CHAR POSITION 






02390 


LD 


E,A 


;DE=CHARACTER POSITION 






02400 


ADD 


HL,DE 


;HL=ADDRESS OF THE CHAR 






02410 


RET 










02420 BLANK 


LD 


A,' ' 


; ASCI I BLANK 






02430 


LD 


(DE) ,A 


; CLEAR LAST BYTE 






02440 


JP 


COPY 


,-COPY TEST TO SCREEN 






02450 COUNT 


LD 


A,(TXTPOS) 


;GET CHAR POSITION 






02460 


LD 


B,A 


; STORE IT 






02470 


LD 


A, 63 


;GET POS OF RIGHT MARGIN 






02480 


OR 


A 


; CLEAR CARRY 






02490 


SBC 


A,B 


;IF CURSOR IS ON R-MARGIN 






02500 


JP 


Z,KBOARD 


; THEN RESTART 






02510 


LD 


C,A 


; ELSE C=NUMBER OF CHAR 






02520 


LD 


B,0 


,-BC-NUMBER OF CHAR 






02530 


RET 










02540 COPY 


LD 


HL,(BEGLIN) 


;GET CURRENT LINE 






02550 


LD 


DE, (SCNLIN) 


;GET CURRENT SCREEN LINE 






02560 


CALL 


STORE 


.•STORE THEM BOTH 






02570 


JP 


COPYL 


;COPY TEXT TO THE SCREEN 






02580 COPYL 


CALL 


RESTOR 


;HL-TEXT RAM,DE=SCREEN 






02590 


LD 


BC,64 


;COUNT =64 






02600 


LDIR 




;COPY TEXT TO SCREEN 






02610 


RET 










02620 DITTO 


LD 


HL, (SCREEN) 


;GET THE SCREEN POINTER 






02630 


LD 


DE,3C00H 


;GET TOP OF SCREEN MEM 






02640 


CALL 


STORE 


; STORE BOTH VALUES 






02650 DTI 


CALL 


COPYL 


;COPY TEXT TO SCREEN 






02660 


CALL 


STORE 


; STORE THE VALUES AGAIN 






02670 


LD 


HL, 16255 


;LAST SCREEN LOCATION 






02680 


CALL 


SBC 


;IF WE ARE AT SCREEN END 






02690 


RET 


M 


; THEN RETURN 






02700 


CALL 


RESTOR 


; ELSE RETRIEVE POINTERS 






02710 


LD 


DE,(TXTEND) 


;GET END OF TEXT 






02720 


CALL 


SBC 


;IF WE ARE NOT AT END 






02730 


JP 


M,DTl 


; THEN LOOP TILL DONE 






02740 


CALL 


RESTOR 


; ELSE RETRIEVE POINTERS 






02750 


EX 


DE,HL 


;HL=CURRENT SCREEN POS 






02760 


JR 


CLS 


;CLEAR TILL END OF SCREEN 






02770 CLS 


LD 


(HL), 1 ' 


; CLEAR A SCREEN BYTE 






027 80 


INC 


HL 


;BUMP THE POINTER 






02790 


LD 


A, 63 


;GET MSB AT END OF SCREEN 






02800 


CP 


H 


;IF MSB IS NOT AT END 






02810 


JR 


NZ,CLS 


; THEN LOOP TILL DONE 






02820 


LD 


A, 127 


;GET LSB AT END OF SCREEN 






02830 


CP 


L 


;IF WE ARE AT SCREEN END 






02840 


RET 


Z 


t THEN RETURN 






02850 


JR 


CLS 


; ELSE LOOP TILL DONE 






02860 CLEAR 


LD 


HL, (BEGLIN) 


;GET CURRENT LINE 






02870 


LD 


B,64 


;COUNT=LENGTH OF LINE 






02880 CLl 


LD 


(HL),' ' 


; CLEAR A BYTE 






02890 


INC 


HL 


;BUMP POINTER 






02900 


DJNZ 


CLl 


;LOOP TILL DONE 






02910 


RET 










02920 MESAGE 


LD 


HL,3F80H 


;GET LAST SCREEN LINE 






02930 


LD 


(4020H) ,HL 


;SET ROM CURSOR POSITION 






02940 


CALL 


CLEAR+3 


; CLEAR BOTTOM LINE 






02950 


EX 


DE,HL 


;HL POINTS TO MESSAGE 






02960 


JP 


021BH 


;ROM DISPLAY VIDEO LINE 






02970 STORE 


LD 


(STORED ,HL 


; STORE HL 






02980 


LD 


(STORE2) ,DE 


.•STORE DE 






02990 


RET 










03000 RESTOR 


LD 


HL, (STORED 


.•RESTORE HL 






03010 


LD 


DE, (STORE2) 


; RESTORE DE 






03020 


RET 










03030 INIT 


LD 


HL.BEGIN+800H 


;GET START OF TEXT RAM 






03040 


LD 


(TXTBEG) ,HL 


;SET TEXT BEGINNING 

Listing continued 

















DISK N DATA 

EDUCATIONAL SOFTWARE AND DISKS 



CVMPnM BULK DISKETTE 

O I INV^VyiVI iRROR FREE 100° iCERTIFi 



LIFETIME 
wo WARRANTY 

SYNCOM diskettes with a lifetime warranty High quality 
packed m polybages of 10 with TYVEC envelopes. Labels 
and Hubnng. 100 % errorfree with a Lustrum Finish, a new 
process that enhances electrical performance, High 
PlayBack signal, low noise, syncom has a increasing media 
life, a Quality Disk 

SSDD ea- $ -|3QDSDD ea- $ -i 8 5 
5V4Qty20l 5V4Qty20 

MICROPHS A name in Educational Software dedicated to education 
Microphs Program designed for use on Apple lllle IBM PC Radio Shack 
TRS-80. Commodore 64, PET'CBM. VIC 20 

Physics • Chemistry • Calculus • Probability • Scholastic 

Aptitude Test Analogies, Mathematics. Vocabulary • Physical 

Science • Spelling • Jr.&Sr High Mathematics • School 

Attendance System • Exam Analysis • Exam Generating 

System • Library Management System • Rolladex System Mail 

List! Telephone Directory • Recreational Word Games 

EDUCATIONAL CATALOG $100 Free with Order 



1 1 



Flexible Disk Tray 

5'U with Key Locking Lid 
40 Disks capacity $22.55— $4.00 shipping 
90 Disks capacity $37.80— $5.00 shipping 
Almond Color base with clear top. 
Plastic Dividers which snap lock in 
Each tile tray has a key locking lid. 



DISKS N DATA 
153 Kings Highway 
Brooklyn NY 11223 
Educational Software 
and Disks 



Vinyl Storage Sleeves 

'or three ring notebook 
5' « 2-Disks per page 
Catalog Cards included 
Minimum order 20 pages 
Ea 59' ' $1 50 Shippmc 



ShipfMHj 5'/. Disk, in- AcM $300 per 100 or 
Fewer Diskettes COO orders. Add S3 00 
New York customer. Add 8". ■ T.i« 
Payment Money orders. Bank Check 

Nationwide: 1-800-842-5400 
In New York: 1-212-837-7563 



ATTENTION TRS-80* OWNERS! 

D0NT SCRAP YOUR MODEL I... 
CONVERT IT INTO A MODEL III WORK-ALIKE 



With 

• Disk Controller 

• 48K RAM RS-232** 
AND ALL OTHER 
MODEL III FEATURES *-J^W., 

The Norcom TC-III is a replacement for the entire Model 
electronics which perfectly fits into your original Model I 
enclosure. 




Features 



Uses Mod I keyboard case, monitor & power 

supply 

Includes lull 48K memory disk controller 

printer A external I O ports same as Model III 

All Model III features plus reverse video & 

output to drive external speaker with no 

additional hardware 

Uses Model III Basic ROMS or other EPROMs 

Runs Model III software 

No expansion interface needed - it's all built-in 

RS-232 add-m accessory board available 

Deluxe Keyboard Available - make your own 

portable 



Assembled & 

Tested TC-III 

with Basic ROMS 



00 



399 



Factory 

Conversion 

of your Model I 



499 



00 



• Deluxe Keyboard -. rtft rtrt 

with Numeric Pad >yy.UU 

Illinois Residents add 7% Sales Tax 

TC-III Board Add $5 00 Shipping 
& Insur 



•RS-232 Interface Board 
fit in case 



$49.00 



Factory Conv add $10 00 
COD'S require 10% payment 
w order 



"RS-232 is optional 'TRS-80 is a trademark of Tandy Corp 



*^541 



NORTHERN INFORMATION 
TECHNOLOGY CORP. 

748 W ALGONQUIN RD . ARLINGTON HTS I L 6000b , 

312-640-3220 



# <m®)J(£LW 8 



NOW YOU CAN DUPLICATE VIRTUALLY ALL OF YOUR TRS-80 DISKETTES 

COPYCAT 3 will allow you to make an exact duplicate of virtually all of your disk- 
ettes even if they are protected. And this includes your games and utilities. COPY- 
CAT 3 automatically analyzes, formats, copies and verifies each track of the diskette 
you are duplicating. The entire process is amazingly fast, typically less than 70 seconds 
and even less with verify turned off. 

COPYCAT 3 is intended for your personal use only, in making backup copies of your 
protected software. 

COPYCAT 3 will run on the TRS-80 Model 3, 4 or 4P computers. 

COPYCAT 3 $49.95 

Please add $2.00 for postage and handling. CA residents add 6% sales tax. 
All orders are normally shipped the next business day via first class mail. 



j 



fc^ T T:i^T^g;lto;T;^:M 



2170 W. Broadway, #501 A 

Anaheim, CA 92804 

(714)772-5000 

Dealer inquiries on your letterhead are welcomed. 




*• See List of Advertisers on Page 176 
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SYSTEM DIAGNOSTIC 

Is your computer working correctly'-" Are you sure? Find out 
for certain with System Diagnostic, which has complete diagnostic 
tests for every component of your TRS-80 ~ Model 1. 3 or 4 

• ROM: checksum tests 

•RAM: three tests including every location and data value. 

• Video Display: character generator, video RAM. video signal 

• Keyboard: every key contact tested 

• Line Printer: character tests with adjustable platen length 

• Cassette Recorder: read, write, verify data 

• Disk Drives: disk controller, drive select, track seek, read sectors, 
formatting, read/write/verify data with or without erasing, disk drive 
timer, disk head cleaner Single or double density. 1-99 tracks 

•RS-232-C Interface: connector fault, data transmission, framing, 
data loop, baud rate generator 
Individual or continuous testing mode, reports optionally written to 
line printer. Separate versions for Models 1. 3. and 4 (Cassette and 
ROM tests not included in Model 4 version ) 
System Diagnostic (specify Model) $99.95 



SMART TERMINAL 

The intelligent communication pro- 
gram. Use your TRS-80 to communicate 
with other computers, bulletin boards, 
information services, time sharing, or for 
data transmission and reception 
•Memory buffer holds data to be 

transmitted or received 
•Automatic transmission from buffer 

• Automatic storage into buffer 

• Character translations 

• Data files compatible with word pro- 
processors and BASIC programs 

•True BRF.AK key 

• Create "personalized" back-up copies 
•Model 1/3/4 version supports both cas- 
sette and disk systems. 

• Model 4 (TRSDOS 6) and Model 
2/12/16 (CP/M) versions available 

Model 1 . 3 or 4 version $74.95 

Model 2/12/16 (CP/M) version . $79.95 



HOME BUDGET and 
CHECKBOOK ANALYST 

Combines the functions of a check- 
book program with budget analysis, 
comparisons, monthly and year to date 
summaries, and projections 

Model 1/3/4 disk version $59.95 

Model 1/3/4 cassette version . . $29.95 
Mod. 2/12/16 or IBM/PC version $69.95 



MAILING LIST 

Maintains mailing lists of up to 1328 
names per disk file Add. change, delete 
or find names Sort according to data in 
any fiels Labels printed in 1.2. 3. or 4 
columns with adjustable tabs. 

Model 1, 3 or 4 version $69.95 

Mod. 2/12 or IBM/PC version . $79.95 



TYPITALL 

The most powerful TRS-80 Word Processor 
TYPI'IALL is a word processor which is upward compatible with 
SCRIPSn"* for the TRS-80" Model 1. 3 and 4 It includes many power- 
ful features, too numerous to list here Following are some of them 

• Spelling checker with 29.500 word dictionary available 

• Verify 3.500 word document in less than two minutes 

• Send any control or graphic/special character to the printer 

• Print text on the screen before going to the printer 
•Send the formatted text to disk file for later printing 

• Merge data from a disk file during printing. 

• Print formatted text during editing (spooling) 

• Assign any sequence of keystrokes to a single control key 
•Call up 16 HELP screens at any time 

• Move cursor forwards or backwards by character, word. line, or page 

• Reenter the program with all text intact if you accidentally exit without 
saving the text 

•True Model 4 (TRSDOS 6) and Model 1/3/4 versions 

"If you like SCR1PSIT". you'// probably love TYPITALL. " 80 Micro. 

TYPITALL demo version $49.95 

TYPITALL complete version $129.95 

TYPITALL with spelling checker $174.95 




TRS-80" MODEL III 
ASSEMBLY LANGUAGE 

A complete course in assembly 
language, written for the beginner. 
Contents include: 

• The Z-80 instruction set 
•TRS-80" Model III ROM and RAM 

• Using the Fditor/ Assembler 

• Reading, printing, and moving data 

• Arithmetic operations with integers 

• Floating-point and BCD numbers 

• Logical and bit operations 

• Cassette input and output 

• USR subroutines in BASIC 

• RS-232-C data communications 

• Disk input and output 

• The TRSDOS 13 disk operating system 

With the book you can also purchase 
Monitor *5, a comprehensive machine 
language monitor and debugger program 
(Monitor *5 also avail for Models 1 & 4.) 

Book only $16.95 

Monitor *5 only $22.95 

Book and Monitor *5 on disk. . . $29.95 



SMALL BUSINESS 

MANAGEMENT 

SYSTEM 

An integrated package that allows 
you to use your computer to manage 
a small business. 

• Order Entry: enter orders, pnnt invoices, 
and recall and change invoices from 
past orders Use preprinted forms or 
plain paper 

• Bookkeeping: complete general ledger 
by user-defined categories 

•Accounts Receivable: interacts with 
order entry by invoice number 

•Inventory: complete summary of 
products sold by part number and price 
invoiced 

•Installation package tailors the pro- 
grams to your business 
Requires minimum 2 floppy disk 

drives or hard disk. 80-column printer 

Available for: TRS-80" Models 1/3/4. 

2/12/16. IBM/PC. Kaypro II. and many 

other CP/M computers 

All versions $250.00 



SMALL 

BUSINESS 

ACCOUNTING 

Based on Dome Bookkeeping Record 
*612. this program keeps track of income, 
expenses, and payroll for a small business 
(payroll not included in cassette version) 
Computes monthly, through last month, 
and year to date summaries, balance 
sheet, complete payroll records 

Model 1/3/4 disk version $59.95 

Model 1/3/4 cassette version . . $29.95 
Mod. 2/12/16 or IBM/PC version $69.95 



Howe Software 

14 Lexington Rd . New City. NY 1095b 

Developing software for TRS-80 

computers since 1979 ^\ 



24-Hour TOLL-FREE Order Number: 
Outside California call: 

(800) 428-7825. ext. 169 

Inside California call: 

(800) 428-7824. ext. 169 

Visa. Master Card, or COD orders onlv 



I or information call: 
(914) 6341821 

Add $3 00 postage & handling. 
New York residents add sales tax 

•1HS-W.I it a Uddrmaik of tandy I orp 




MAD finds out where Model 4 machine- 
language programs load 
and execute. 



Finding the 
Right Address 

by John Ratzlaff 



f you want to 
find out where a 
machine-lan- 
guage program 
loads in RAM 
or how much memory it takes up, you 
have to know the file's load addresses. 
DOSPLUS and LDOS for the Model 
III provide address mapping utilities, 
but Model 4 DOSes don't. That leaves 
Model 4 users with no choice but to 
search files by hand for load address- 
es. I've developed a Model 4 address 
mapping utility called MAD (mapped 
addresses) that does the job for you. 

MAD displays the load addresses of 
the blocks in a load module. A load 
module is a disk file that contains code 
you load in memory and execute, usu- 
ally as a machine-language program. 
Using the utility, you can determine 
where these programs load, where 
they execute, and how much memory 
they occupy. 

For instance, you can discover that 
Microsoft Basic, included with TRS- 
DOS 6.X, loads from 3000-8 IFF hex- 
adecimal (hex) and begins execution at 
7F0C hex. You can also learn that the 
BE1 Basic enhancements package sup- 
plied with DOSPLUS IV consists of 
many little sections of code that over- 
write Microsoft Basic, as well as one 
or two large sections of code. 

Program Notes 

I wrote MAD using the M-ZAL as- 
sembler and TED text editor that 
come with DOSPLUS IV/A for the 
Model 4. It works under TRSDOS 
6.X or DOSPLUS IV because it uses 
supervisory calls common to both op- 
erating systems. 

You execute the program at the 
DOS level by typing in MAD followed 
by the name of a load module file. For 



example, MAD will display its own 
load addresses if you type in MAD 
MAD. The resulting display is: 

2400-258F 
Exec = 2400 

This tells you that the MAD/CMD 
program loads from 2400-258F hex 
and executes at 2400 hex. If you don't 
enter a file name extension, the utility 
automatically adds the /CMD exten- 
sion since that's the one most load 
module files use. You can specify an- 
other extension, too, as in MAD LE- 
SCRIPT/DVR. 

Under TRSDOS 6.X, system files 
(such as Basic) have their own pass- 
words — they're listed in the technical 
manual. To use the MAD program 
with these files, you must type in the 
password; for example, MAD BASIC/ 
CMD.BASIC. 

Load Module 
Format Explained 

The load module format is one as- 
pect of the TRS-80 line that has re- 
mained fairly constant from DOS to 
DOS and from the Model I to the 
Model 4. The standard format speci- 
fies that the file be in blocks, each of 
which begins with a byte identifying 
the type of block. 

Traditionally, the format comprises 
three types of blocks. Comment 
blocks identify the purpose of the file 
and are not loaded into memory. Ob- 
ject code blocks contain the actual 
program code and the address at 
which the computer starts loading that 
code. Execution (transfer-address) 
blocks specify the transfer address of a 
machine-language program. 

Recently, several new block types 
have been included in the standard. 



The traditional comment block some- 
times contains only the file name, 
while another new type of comment 
block contains other notation, such as 
copyright or authorship information. 

Another new block is the patch 
block. Like a comment block, it iden- 
tifies the object code block that fol- 
lows it as a patch. When you remove a 
patch using the DOS's Yank function, 
the patch code is not removed; in- 
stead, the object code block gets a new 
block identifier byte telling the DOS 
loader to ignore that block. 

All blocks begin with a block identi- 
fier byte (see the Table): 05 indicates a 
comment block, 01 an object code 
block, 02 an execution address block, 
and 07 a patch block. After the identi- 
fier byte comes a byte indicating the 
number of bytes to follow in the 
block. The remaining bytes contain in- 
formation about the program or code 
you want to load. 

For example, an entire comment 
block might look like this: 05 06 53 43 
52 49 50 54. The 05 byte identifies the 
block as a comment block. The 06 tells 
you that 6 bytes will follow; those 6 
bytes contain the first six letters of the 
file name, SCRIPT in this case. A 
sample execution block is: 02 02 00 70, 
where the execution address is 
7000 hex. 

In an object code block, the 2 bytes 



The Key Box 



LOAD 80 



Model 4 

64KRAM 

Basic 

Assembly Language 

Editor/ Assembler 

TRSDOS 6.X or DOSPLUS IV 
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that follow the length-of-block byte 
define the address where the computer 
should load the code. Take, for exam- 
ple, a block containing these bytes: 01 
04 00 F0 F3 C9. The 01 indicates an 
object code block; the 04 means 4 
bytes will follow; the 00 and FO bytes 
are the address (F000 hex); therefore, 
the two remaining bytes, F3 and C9, 
load at F000 and F001 hex. 

Usually, when the operating system 
loads large sections of code, their 
blocks are contiguous so they load one 
after another in memory. Such blocks 
might start with the bytes 01 00 00 30, 
etc. This block would load FE hex, or 
254 bytes of code because the length- 
of-block byte is 00, which really means 
256, and the address takes up two of 
those bytes. 

Sometimes you'll see an object code 
block that begins like this: 01 02 00 30, 
etc. At first, you might think this 
block indicates no code is included, 
because the length-of-block byte is 02, 
which leaves room only for the ad- 
dress bytes. However, when you sub- 
tract the address byte's 2 bytes from 
the length-of-block byte, you get 00, 
indicating 256 bytes will follow in the 
block. 

Each load module file should con- 
tain only one execution block, and 
that block must be at the end. It's 
theoretically possible to have more 
than one execution block, but the 
DOS program loader won't load any 
blocks after the first execution block. 
Therefore, the MAD program ends 
following an execution block. If the 
program finds no execution block, or 
if it locates a block with an identifier 
byte other than those listed in the Ta- 
ble, it aborts with a "Load File For- 
mat Error" message. 

Program Listing 2 is the MAD utili- 
ty in Basic — it's much slower than the 
Assembly-language program, of 
course. You can figure out the logic of 
the routine by looking at the Basic 
program. I used DOSPLUS Enhanced 
Basic, which allows labeled address- 
ing. To convert it to standard TRS- 
DOS Basic, remove all the Name com- 
mands and replace the labels in the 
GOTO statements with the appropri- 
ate line numbers. ■ 



John Ratzlaff is a math teacher. 
You can write him at Mount Pisgah 
Academy, Candler, NC 28715. 



Byle 


Description B>te Description 


01 


Object code block 07 Patch (comment) block 


02 


Execution address block 10 Yanked patch object code block 


05 


Comment or file name block IF Comment block 




Table. Block identifier bytes. 





Program Listing 


/. Assembly-language 


\<ersion of address mapping utility. 


00100 


j MAD/ ASM by Jo 


hn Ratzlaff 02/19/84 


00110 


j 








00120 


.•Displays load 


addresses of load 


-module- format disk files. 


00130 


; Executed by typing MAD FILENAME 


or MAD FILENAME/CMD from DOS. 


00140 


1 (Default extension Is CMD) . 




00150 


(Works 


on TRS- 


80 Model 4 under DOSPLUS IV or TRSDOS 6.x 


00160 










00170 




ORG 


2400H 




00160 


START 


LD 


DE.PCB 




00190 




LD 


A.4EH 


(gFSPEC 


00200 




RST 


28H 


;GET FILESPEC AND PUT IN FCB 


00210 




JR 


Z,OK 




■i ,' ,. 1 <i 




CP 


0DH 


;CR INDICATES NO FILENAME ENTERED 


00230 




LD 


HL.MSG5 


.•'Filename required' 


00240 




JR 


Z,SKIP4 




00250 




LD 


HL.MSG6 


; 'Improper filename' 


00260 


SKIP4 


CALL 


MSG 




00270 




JP 


DOS 




00280 


OK 


LD 


DE,FCB 




00290 




LD 


HL,EXT 




00300 




LD 


A.4FH 


; PFEXT 


00310 




RST 


28H 


(ADD /CMD EXTENSION IF NONE PRESENT 


00320 




LD 


DE.FCB 




00330 




LD 


B,0 


;LRL 


00340 




LD 


HL,BUFF 




00350 




LD 


A.3B11 


(0OPEN 


00360 




RST 


28H 


;OPEN FILE 


00370 




JP 


NZ, ERROR 




003 80 


MAIN 


CALL 


GET 


(GET BLOCK IDENTIFIER BYTE 


00390 




CP 


5 




00400 




JR 


Z, COMENT 


; COMMENT BLOCK 


00404 




CP 


1FH 




00408 




JR 


Z , COMENT 




00410 




CP 


1 




00420 




JR 


Z, BLOCK 


; OBJECT CODE BLOCK 


00424 




CP 


10H 




00428 




JR 


Z, BLOCK 


; YANKED PATCH OBJECT CODE BLOCK 


00430 




CP 


2 




00440 




JR 


Z , EXEC 


EXECUTION ADDRESS BLOCK 


00450 




CP 


7 




00460 




JP 


Z , PATCH 


; PATCH BLOCK 


00470 


ABORT 


LD 


HL.MSG1 


;LOAD FILE FORMAT ERROR 


00480 




CALL 


MSG 




BC A 9? 




CALL 


CLOSE 


;CLOSE FILE 


00500 




JP 


DOS 


•GO TO DOS 


00510 


COMENT 


LD 


A, (FLAG) 




00520 




OR 


A 




00530 




CALL 


NZ.SHWEND 




00540 


COMM1 


CALL 


GET 


;GET » OF BYTES IN BLOCK 


00550 




LD 


B,A 




00560 


CLOOP 


CALL 


GET 


j GET COMENT BYTE 


00570 




CALL 


DSP 


; DISPLAY IT 


00580 




DJNZ 


CLOOP 




00590 




CALL 


CR 


; PRINT CR 


00600 




JR 


MAIN 


;GO BACK TO MAIN LOOP 


00610 


BLOCK 


CALL 


GET 


(GET BLOCK LENGTH 


00620 




LD 


B,A 




00630 




CALL 


GET 


(GET BLOCK LOAD ADDRESS 


00640 




LD 


L,A 




00650 




CALL 


GET 




00660 




LD 


H,A 




00670 




CALL 


CPHLIY 


,- COMPARE HL,IY 


006 80 




JR 


Z.SKIP2 


;SAME ADDR - DON'T DISPLAY OLD ADDR. 


006 90 




LD 


A, (FLAG) 




00700 




OR 


A 




00710 




CALL 


NZ.SHWEND 




00720 


SKIP2 


LD 


A, (FLAG) 




00730 




OR 


A 




00740 




JR 


NZ.SKIP3 




007 50 




PUSH 


HL 


; TRANSFER HL TO DE 


00760 




POP 


DE 




00770 




PUSH 


DF. 


(SAVE ADDRESS IN IY 


007 80 




POP 


IY 




007 90 




CALL 


HEX 


(DISPLAY BLOCK START ADDRESS 


00800 




LD 


HL,MSG2 


) ' - ' 


00810 




CALL 


MSG 




L't'L'^l) 


SKIPS 


DEC 


B 


(COMPENSATE FOR ADDRESS BYTES 

Listing 1 cunimmil 
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SuperSCRIPSIT Printer Drivers 



Easily ana automadeeey atteen >w pooler to Sup«iSCHiP'.:T w.m an 
ALPS software driver program Ow IOC oVIferenl printer* supported 

No need 10 Wn special codes Can or write vw latest Product n ove». 
Sneet describing 'eature. supported on «»ch pumt 
proportional etc ) 

$49 or J59 eecn depending on eec.n pj 



Use Memory as Disk' Mod 4(111) 

Speed up programs py using your *«t' a rnemory a* a d"we Use MCMOSK 
as »out Ssatfrm Om» <r toad Me* irno memory try Instant ten* I «y 
to use with 1 simple command No program cft*nges 'equnu.-: 
MEMOiSK a* i1 il were a On* di,v» An ent"e UEMOr - 
easily be saved to (or loaded horn) rtoppy d>sk Uses 80* or t?»x memory 
(6aK on «P| (LOOS only I 



NEW FOR TANDY 2000 

(and IBM PC) 

IMPROVE PERFORMANCE & FLEXIBILITY 

OF YOUR PC APPLICATIONS 



Use Memory as Superfast Disk %m 

RAMOISK ■ Use spare memory as a J >« to kw) .. 

speC'ty RAM ! Apptvar* ro progrmmm an a drsa. pot orves 

indent access Ejs> to nail and . 



Directory / File / Backup Tools is» 

I Onpt*Y aJprMoetued s column ovrettory Uelirg, 

v. a g'arvte on 1 screen 
? find a file aeai h tttrtt aji flMtlmin lor t W» imri tntl 
occurrences 

3 Directory free '>.*piey oveciory tree *t>u>:iure Detow any r^me >n eeS'ty 
readable lorm 

4 OecAup onry moov»ed rWes - speed up and automate backup operetKin 
Stores >n same 'crmat as ot*}tne» tor 



User Tool Assortment 

I. Define a command aa on* kty • : 'jaer &ci 

| ? y command stn-<j .- 
^ Count Knee on /ilea !>■;>- 

3 Dump rim In Ne« and' cnarecte' 

4 Crranye ownersnlp « aflritrurrs or >Me> Vim i r-a>e t*» iMMen **o 



Attach a Serial Printer 



tends, you i 
Complen 



MS 

il punter U)-i - 



-' SuppOt 



ALPS 

23 Angus Road 
Warren, New Jersey 07060 

201-647-7230 



• 374 




DOIl't be. We provide Rfter- 
Morket Service, upgrades, repoirs ood 
restorations for TR.S- 80 Models I, III, IV 
and 100, whether modified or not 
We'll also fix or upgrade your non- 
Radio Shack peripherals. 

Rnd we repair at the component 
level • we don't board swop. This 
means big savings to uou. 
Got a problem? Call us. 
W1LDWOOD 
DATA SYSTEMS 
Box 114 Plank Rd. 
Berlin. NY 12022 
(518) 658-2444 






Listing 1 continued 












00630 


DEC 


B 








00840 BLOOP 


CALL 


GET 


,GET BYTE AND THROW IT AWAY 






00850 


INC 


IY 


; UPDATE ADDRESS COUNTER 






00 860 


DJNZ 


BLOOP 


j LOOP FOR ALL BYTES IN BLOCK 






00870 


LD 


A.l 


/SET FLAG 






00880 


LD 


(FLAG) ,A 








00 890 


JR 


MAIN 


;GO BACK TO MAIN LOOP 






00 900 EXEC 


LD 


A, (FLAG) 








00910 


OR 


A 








00920 


CALL 


NZ, SHWEND 








00930 


CALL 


GET 


;HOW MANY BYTES IN BLOCK? 






00940 


CP 


2 


; SHOULD BE 2, OR ELSE1 






00950 


JR 


NZ, ABORT 








00960 


LD 


HL,MSG3 


; 'EXEC - ' 






00970 


CALL 


MSG 








00980 


CALL 


GET 


;GET EXECUTE ADDRESS 






00990 


LD 


E,A 








01000 


PUSH 


DE 


/PRESERVE E 






01010 


CALL 


GET 








01020 


POP 


DE 








01030 


LD 


D,A 








01040 


CALL 


HEX 


/DISPLAY ADDRESS 






01050 


CALL 


CR 








01060 


CALL 


CLOSE 


/CLOSE FILE 






01070 


JR 


DOS 


/ALL FINISHED! 






010 80 PATCH 


LD 


A, (FLAG) 








01090 


OR 


A 








01100 


CALL 


NZ, SHWEND 








01110 


LD 


HL,MSG4 


/ 'PATCH = ' 






01120 


CALL 


MSG 








01130 


JP 


COMM1 


/JUMP INTO COMMENT ROUTINE 






01140 MSG 


LD 


A,0AH 


/ 3DSPLY 






01150 


RST 


28H 








01160 


RET 


Z 








01170 


POP 


HL 








01180 


JR 


ERROR 








01190 CPHLIY 


PUSH 


DE 


/SAVE DE 






01200 


PUSH 


IY 


/TRANSFER IY TO DE 






01210 


POP 


DE 








01220 


LD 


A,H 








01230 


CP 


D 








01240 


JR 


NZ,SKIP1 








01250 


LD 


A,L 








01260 


CP 


E 








01270 SKIP1 


POP 


DE 


/RESTORE DE 






01280 


RET 










01290 SHWEND 


PUSH 


HL 


/SAVE HL 






01300 


PUSH 


IY 


/TRANSFER IY TO DE 






01310 


POP 


DE 








01320 


DEC 


DE 








01330 


CALL 


HEX 


/DISPLAY END ADDRESS OF 






CONTIGUOUS BLOCK 










01340 


CALL 


CR 








01350 


XOR 


A 


/CLEAR FLAG 






01360 


LD 


(FLAG) ,A 








01370 


POP 


HL 








01380 


RET 










013 90 CLOSE 


LD 


DE,FCB 








01400 


LD 


A,3CH 


/ SCLOSE 






01410 


RST 


2 8H 








01420 


RET 


z 








01430 


POP 


HL 








01440 


JR 


ERROR 








01450 DOS 


LD 


HL,0 








01460 EXIT 


LD 


A.16H 


/8EXIT 






01470 


RST 


28H 


/JUMP TO DOS 






01480 ERROR 


LD 


C,A 








01490 


SET 


6,C 


/"NORMAL" ERROR MESSAGE 






01500 


LD 


A.1AH 


/ § ERROR 






01510 


RST 


28H 


/RETURNS TO DOS AFTER DISPLAYING 






ERROR 












01520 GET 


LD 


DE r FCB 








01530 


LD 


A, 3 


/3GET 






01540 


RST 


28H 








01550 


RET 


Z 








01560 


POP 


HL 








01570 


JR 


ERROR 








015 80 DSP 


LD 


C,A 








01590 


LD 


A, 2 


• CDS? 






01600 


RST 


28H 








01610 


RET 


2 








01620 


POP 


HL 








01630 


JR 


ERROR 








01640 CR 


LD 


A,0DH 


/DISPLAY A CARRIAGE RETURN 






01650 


JR 


DSP 








01660 HEX 


LD 


HL,HEXBUF 


/POINT TO BUFFER FOR ASCII 






01670 


LD 


A.63H 


/SHEX16 






016 80 


RST 


28H 








016 90 


LD 


HL,HEXBUF 








01700 


JR 


MSG 


/DISPLAY ASCII 






01710 MSG1 


DEFM 


'Load file 


format error' 






01720 


DEFB 


0DH 








01730 MSU2 


DEFM 


i _ i 








01740 


DEFB 


3 








01750 MSG3 


DEFM 


'Exec ■ ' 








01760 


DEFB 


3 


Listing 1 continued 
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(Ill mflRYITlflC INDUSTRIES INC 

800-231-3680 

Radio Shack TRS-8o'$ 

EPSON PRINTERS 

People you Trust to give you the very best! 




»- ----->->■ ^--y 




^ 




Lowest 
Price 

Reliable 
Service 

Quality 
Products 



22511 Katy Fwy., Katy (Houston) Texas 77450 
(713) 392-0747 Telex 774132 



TRS-80 



ALWAYS AT 
SALE PRICES 

WITH MANUFACTURERS 
WARRANTY (IN USA). 




HANDY HOME COMPUTER 
FOOTBALL SYSTEM 120 

USER FRIENDLY- MENU DRIVEN 
DESIGNED BY COMPUTER PROFESSIONALS 

Evaluate teams at all levels PEE WEE to NFL Define the teams, 
their ratings and schedules Weekly enter the scores and statistics 
with no redundancy Individual items can be corrected. 

The main menu follows 

1 . UPDATE TEAMS (Define names, ratings. Y-T-D Stats) 

2. CREATE/UPDATE SCHEDULES 

3. STATS ENTRY Enter newspaper results) 

4. POST RESULTS I Update team with results) 

5. FORECAST GAMES (Predict game scores) 

6. RPT WRITER i Define and print/display reports) 

To save the initial entry of the teams ratings, statistics, and 
especially their schedules, also purchase the current data files 

Follow Collegeand NFL football with no data entry; purchase the 
Evaluation Subscriptions) These Monday mailings include predic- 
tions and updated statistics The latest edition is included with each 
system to provide up-to-date team data 

For the TRS-80 l/llf/IV/1 00. APPLE ll/IH. IBM PC. KAYPRO II. and 
Commodore 64 BASIC listings also available to program other 
computers Specify computer, tape or disk. 

$39 95 for the BASIC system. $6 1 95 with College data, S57 95 
with NFL data. S78 95 with both Add S3 S&H. Evaluation Subscrip- 
tion College or NFL is S29 95. both for S39.95. 

VISA or MASTERCARD welcome 

HANDY AND ASSOCIATES 

15/75 N Hillcrest. Suite 508, Dept. 307 
DALLAS. TX 75248/214-492-3670 

• See List ol Advertisers on Page 176 



CALL TOLL FREE 

To get YOUR 
SALE PRICE-DIAL 

1-800-433- SALE 

(9am - 5pm C.S.T.) 



COMPUTER. 



CENTER 



WE SHIP 

FAST! 



I)F\V COMPITKR CENTER 

326 MAIN ST.. GRAPEVINE 
TEXAS 76051 (817)481-7283 



REGD: TANDY CORPORATION 




S 282 
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80 Micro, November 1984 • 83 



REMSOFT, INC 



THE LIVING TRS-80 

For Those Who MUST Know More! 

Finally. REMsofI has responded lo those 
who have asked for a beginning level tutorial 
This course was designed by J Thomas 
Evans. Jr for the person who is just starling 
to explore the wonderful world to TRS-80 
computing The learning objectives the 
course was designed to provide 

• Skills in the use ot BASIC and its editing 
capabilities 

• A fundamental understanding of the 
operation of the Z80 processor within the 
TRS-80 

• An entry-level knowledge of assembly 
language with some skill in the use of 
an editor-assembler 

• An understanding of the choices 
available in the selection of hardware 
anc software as well as an appreciation 
for the methods of applying the 
computer to specific tasks 

• A good understanding of the types and 
availability of other resources which can 
provide greater levels ot knowledge and 
skin 

Requires 32K and one disk drive Available 
for Model hi and Model 4 (in Model ill mooei 

LIVING TRS (disk) $79.95 



Let Your TRS-80' 

Teach You 

ASSEMBLY LANGUAGE 

Tired of buying book after book on assembly 
language programming and still not knowing 
you r POP from your PUSH? 

REMSOFT proudly announces a more 
efficient way. using your own TRS-80' to 
learn the fundamentals of assembly language 
programming at YOUR pace and YOUR 
convenience 

Our unique package INTRODUCTION TO 
TRS-80- ASSEMBLY PROGRAMMING ft I 

provide you with the following 

• Ten 40 minute lessons on audio 
cassettes 

• A driver program to make your TRS-80' 
video monitor serve as a blackboard for 
the instructor 

• A display program lor each lesson to 
provide illustration and reinforcement for 
what you are hearing 

• Step- by-step dissection of complete and 
useful routines to test memory and to 
gain direct control over the keyboard, 
video monitor and printer 

• How to access and use powerful routines 
in your Level II or Model III Basic ROM 

in MOD III Mode) 
S74.95 
$79.95 

rixs course was developed ■ .'• 

jnc jre tuseC or the successful se'ies .' .uuises he IMS 
""hnoloqies Co'pofjlmr IM KM 
•ie- odfions in NorV - 



AVAILABLE FOR I. Ill and 4 
REMASSEM (tape) 
REMASSEM(disk) 



REMSOFT, INC 

571 E 185 St 

Euclid, Ohio 44119 

(216) 531-1338 



I v. CHARGES 

STATES 
j ANAI « ANC WlXlCO 

'j[m[H FOREIGN 

UES tax 

■ - • S A IRAOfMAR- ■•■'. • -■ 
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01770 


MSG4 


DEFM 


'Patch = ' 






017 80 




DEFB 


3 






01790 


MSG5 


DEFM 


'Filename required' 






01800 




DEFB 


0DH 






01810 


HSG6 


DEFM 


'Improper filename' 






01820 




DEFB 


■OH 






01830 


FLAG 


DEFB 









01840 


HEXBUF 


DEFW 









018S0 




DEFW 









01860 




DEFB 


3 






01870 


EXT 


DEFM 


'CMD' 






01880 


FCB 


DEFS 


32 






01890 


BUFF 


DEFS 


256 






01900 




END 


START 






01920 


MSG2 


DEFM 


* - ' 






01930 




DEFB 


3 






01940 


MSG3 


DEFM 


'Exec = ' 






01950 




DEFB 


3 






01960 


MSG4 


DEFM 


'Patch ' ' 






01970 




DEFB 


3 






01980 


MSG5 


DEFM 


'Filename required' 






01990 




DEFB 


0DH 






02000 


MSU6 


DEFM 


'Improper filename 






02010 




DEFB 


0DH 






02020 


FLAG 


DEFB 









1 , 1 3 1 


HEXBUF 


DEFW 









02040 




DEFW 









02050 




DEFB 


3 






02060 


EXT 


DEFM 


•CMD' 






02070 


FCB 


DEFS 


32 






02080 


BUFF 


DEFS 


256 






02090 




END 


START 


End 



Prugrum Listing 2. Basic version of address mapping utility. 

'MAD/BAS by John Ratzlaff 

10 ON ERROR GOTO TROUBLE 

20 INPUi"Filename";F$:F$=F$+"/CMD" 

30 OPEN " I ",1,F$: CLOSE 1 

40 OPEN"R",l,F$,l:FIELD 1,1 AS A$ 

50 ' 

60 NAME MAINLOOP:GET 1:A=ASC(AS) 

70 If A=5 OR A=31 THEN GOTO COMMENT 

80 IF A=l OR A=16 THEN GOTO BLOCK 

90 IF A=2 THEN GOTO EXEC 

100 IF A=7 THEN GOTO PATCH 

110 ' 

120 NAME ABORT 

125 PRINT"* Load file format ettorl *" 

130 CLOSE -.END 

140 • 

150 NAME COMMENT 

155 IF FLAG THEN PRINT HEX$ (C0-1) : FLAG=0 

160 GET 1:B=ASC(A$) 

170 FOR J=l TO B:GET 1: PRINT A$; :NEXT: PRINT 

180 GOTO MAINLOOP 

190 ' 

200 NAME BLOCK 

210 GET 1:B=ASC(A$) :IF B=0 THEN B=256 

220 GET 1:C=ASC(A$) :GET 1 :C=C+256*ASC (A$) 

230 IF FLAG AND COC0 THEN PRINT HEXS (C0-1) :FLAG=0 

235 IF NOT FLAG THEN PRINT HEX$(C)" - ";:C0=C 

240 B=B-2:IF B=0 THEN B=256 

250 FOR J=l TO B:GET 1 :C0=C0+1:NEXT 

255 FLAG=-l:GOTO MAINLOOP 

260 ' 

270 NAME EXEC 

275 IF FLAG THEN PRINT HEX$ (C0-1) : FLAG=0 

280 GET 1:B=-ASC(AS) : IF B<>2 THEN GOTO ABORT 

290 GET 1:C=ASC(A$) :GET 1 :C=C+256*ASC(A$) 

300 PRINT"Exec = "HEX$(C) 

310 CLOSE: END 

320 ' 

330 NAME PATCH 

335 IF FLAG THEN PRINT HEX$ (C0-1) : FLAG=0 

340 GET 1:B-ASC(A$) :PRINT"Patch = 

350 FOR J=l TO B:GET 1: PRINT A$; : NEXT: PRINT 

360 GOTO MAINLOOP 

370 ' 

3 80 NAME TROUBLE 

3 90 IF ERR=53 THEN PRINT"* File not found! *":END 

400 ON ERROR GOTO 



84 • 80 Micro, November 1984 



ANYONE CAN USE OUR SOFTWARE! 




MAIL PAC II and CHECKING PLUS represent a 
new generation of computer software. Our 
software doesn't even need a manual! Any- 
one can quickly learn to use either package 
by following simple, explicit on-screen 
instructions. But, for those of you who insist 
— we've included a complete user's manual 
as well. 



feiUac i in 


. »> ww fr -J . — 

i* i •••• Qt ~ 

/ . 






MAIL PAC II & 











MAIL PAC II FEATURES: 
High Capacity - 

Stores from one to one million names in Zip Code. Numerical or Alpha- 
betical order The only limitation is your disk storage space 

Flexibility - 

Prints your mailing list on 1 . 2. 3, or 4-across labels (with up to 5 user- 
defined lines on each label) or as a compact, user-designed directory 
The record length is completely user-defined, and each field within 
each of your records is completely variable (allowing storage of any 
number of characters for any particular address entry) Devote fields 
to telephone numbers, codes, or even special messages related to each 
particular name on file 

Powerful -- 

A built-in word processor allows you to creata personalized form letters 
for each address on your list (or just a particular group of addresses) 

Ease of Use — 

Create new mailing lists, review existing lists, handle changes of 
address, delete cancelled names, sort lists, and purge duplicate names 
from your files Complete on-screen instructions tell you in plain 
english exactly how to accomplish all of these tasks. 

MAIL PAC II $99.95 
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CHECKING PLUS FEATURES: 
Complete Check Register — 

Checking Plus stores your entire check register in a disk file and then 
uses the data to balance your account, track your expenses, and help 
you make budget projections. Review the entire checkbook, enter 
checks, deposits, fees and adjustments, mark outstanding checks when 
paid and get an instant cash balance at any time All data can be viewed 
onscreen or printed out in report form 

Tax Preparation -- 

Storage of monthly and yearly totals and other important information 
aids in income tax preparation, for your personal use or for your 
accountant 

Handles the Details — 

Store names and addresses for frequently written checks, then print 
checks to fit standard window envelopes, eliminating the need for extra 
typing You can even store any comment, explanation or other message 
(up to 255 characters) related to a particular check 

Automatic Monthly Bill Payments -- 

Enter amounts and names of payees for all of your fixed-cost monthly 
payments, and then sit back while the system automatically prints 
checks 

CHECKING PLUS $99.95 



Both Programs Require 48K And At Least One Disk Drive (2 Drives For 
Higher Storage Capacities) And All Hard Disk Systems Are Supported 



FREE TRS-80 Mod L.IJJ & 4 programs suppled on DosPlus (minimum system) 
Complete DosPlus also available. 



FOR YOUR TRS-80- • APPLE" • IBM PC" • NEC* • OSBORNE" • XEROX" • KAYPRO" • TELEVIDEO" • ZENITH" • SANYO" 
DEC" • Tl PROFESSIONAL COMPUTER" • SUPERBRAIN JR " • EPSON" • Any CP/M" Computer 

CP M based Computer* mull be •quipped with Microsoft BASIC (MBASIC or BASIC-M) 

TRS«0 trademark Tandy Corp APPLf trademark Apple Corp IBM PC trademark IBM Corp - ATARI Iredemerk Alai. Inc OSBORNE trademark Osborne Corp XEROX trademark Xero. Corp 

KAWRG trademark Non-L.near Systems Inc TELEVIDEO trademark Tetevideo System* inc SANVt) trademark Sanyo Corp - NEC trademark NEC Corp DEC trademark D-giial Equipment Corp 

2ENITH trademark Zen.m Corp - T I PROFESSIONAL COMPUTER Irademark Te.as Inslrumenls. Inc SUPERBRAIN trademark Inlerlec Corp CP/M trademark D-g.lal Reseaech - EPSON trademark Epson Corp 



OUR SOFTWARE CATALOG 

H & E Computronics. Inc , has mailed more than 1 million 
software catalogs since 1978 Send $2 for our new 64-page 
catalog today 1 (We also send you our catalog FREE with 
every order) DEALER INQUIRIES WELCOME 



30-DAY MONEY BACK GUARANTEE 

•" ALL PRICES ft SPECIFICATIONS SUBJECT TO CHANGE " 
DELIVERY SUBJECT TO AVAILABILITY 
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Eliminate your Basic program's garbage- 
collection delays with these routines. 



Quit Stalling 




ou re running a 
program and 
suddenly the 
screen freezes. 
You press a key 
or two. Nothing happens. You try the 
break key. Still nothing. These are the 
telltale signs of garbage collection, an 
internal housekeeping routine that 
temporarily takes control of your 
computer system. You can regain con- 
trol only by pressing the reset button 
and aborting the program. Otherwise, 
you just have to wait for the program 
to resume execution on its own. 

Garbage collection delays occur 
when you use large amounts of string 
memory. Fortunately, it's possible to 
eliminate those delays and dramatical- 
ly cut program execution time. 

How Long Do I Have to Wait? 

Program Listing 1 illustrates how 
garbage collection can slow your com- 
puter down. The program creates a 
string array dimensioned to hold 1 ,000 
elements, each a single random letter. 
Phase 1 of the program assigns values 
to the array; the screen displays the 
starting and ending times for the pro- 
cedure so you can see how long it 
takes. 

Phase 2 loops 100 times between 
lines 90 and 120, executing some sim- 
ple string operations and again dis- 
playing the starting and ending times. 

When you run the program, you'll 
notice delays of about two minutes for 
every 17 or so executions of the loop. 
During those delays, garbage collec- 
tion is taking place. 

When the program ends, your 
screen should look like Fig. 1. Execu- 
tion time is 11 minutes, even though 
the program itself takes only a few sec- 
onds to process. This example isn't an 



aberration; whether you load strings 
from main memory or from a disk 
file, and no matter what operations 
you perform on them, garbage collec- 
tion still occurs. 

Saving Strings 

To understand what causes garbage 
collection, you need to know some- 
thing about how Basic uses memory 
for string operations. In line 20 of 
Listing 1, the statement CLEAR 1500 
reserves 1,500 bytes of memory. The 
highest address of this string area is the 
number you enter in response to the 
memory size prompt when you get in- 
to Basic. The computer stores this 
number in memory locations 16,561 
and 16,562 in standard 2-byte format. 
To determine the number, type in 
PEEK(16561) + 256"X*PEEK( 16562). 

Memory locations 16,544 and 
16,545 store the lowest address of 
string memory minus 1. A third rele- 
vant address, the first free string loca- 
tion, is stored at 16,598 and 16,599. 

Program Listing 2 demonstrates 
how Basic uses string memory during 
program execution. Line 10 reserves 
64 bytes of memory for string opera- 
tions. Lines 20-40 display the lowest 
and highest addresses of this string 
area, as well as the first free location. 

Lines 50-70 let you see on a single 
screen line what data the system keeps 
in string memory (unused areas are 
displayed as X's). Line 80 lets you 
input a value for the variable X$. 
The program then returns to line 30 
and updates the display, after which 
you can enter another value for X$, 
and so on. 

Run the program and type in 
FIRST STRING as the first value for 
X$. Type in SECOND STRING the 
second time, and THIRD STRING 
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the third time. The screen should look 
like Fig. 2. 

Note that the old values aren't 
erased as you assign new values to X$. 
Instead, the computer uses string 
memory the way you'd use a sheet of 
paper if you had no eraser. It stores 
the values sequentially until it runs out 
of room. 

Keep entering new values for X$. 
When you use up all the string memo- 
ry, the system erases obsolete data and 
packs all active strings toward the top 
of the string area. This is the garbage 
collection process. 

Now for an explanation of what 
happens when you run Listing 1 . After 
the program assigns values to A$(I%), 
500 bytes of string space remain. In 
manipulating X$ and Y$, the program 
uses up that space after about 17 exe- 
cutions of the loop. 

When the string memory area be- 
comes full, the system tries to erase 
obsolete data and clear space by pack- 
ing the 1,002 active strings together 
near the top of memory. In this case, 
no obsolete values exist, but the check- 
ing process takes time. 

Making a Switch 

Two characteristics of string storage 
point the way to a solution of the gar- 
bage collection problem. First, the 
computer doesn't store every string in 
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Models I and HI 

Model 4 (Program Listings 

1 and 3 only) 

16K RAM Cassette Bask 

32K RAM Disk Basic 
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Learn to Program Like a Professional! 

THE COMPLETE BOOK OF RANDOM ACCESS 
& DATA FILE PROGRAMMING 





Written for TRS-80™ I. II, & III - IBM V PC - APPLE™ M/S - OSBORNE- - HEATH™ - DEC™ - 
SUPERBRAIN™ - and all Computers using CP/M with Microsoft BASIC™ 

The last word on disk random access and file handling techniques, this series is intended for everyone — beginning programmers, businessmen 
and professionals will learn how to create custom programs to handle inventories, mailing lists, work scheduling, record keeping, and many other 
tasks, while more experienced programmers will learn advanced, professional programming techniques for faster, more efficient data storage 
and retrieval 

Although random access file handling is a matter of some complexity, the subject has been treated In a simple and down-to-earth fashion, so that 
anyone with some small familiarity with programming in Microsoft BASIC will be able to cope with the material Each stage of learning uses a 
sample program as a starting point The programs grow in capability and complexity as the books progress into all of the various aspects of file 
handling and record manipulation. An extensive effort has been made to keep the material coherent and every program line is explained in detail. 



Volume I 
BASIC FILE HANDLING 

• The writing of a Menu to summarize program functions 

• Screen format for data entry 

• The creation of a basic record 

• The FIELD and LSET routines for buffer preparation 

• Disk storage of random access records 

• Changing or editing stored records 

• The LPRINT capability from disk using three different formats 

• Sorting the random file 

• Searching by name or key field 

• Search in "next" or "prior" fashion 

• Purging deleted records 

• Using disk file data for calculations 

• Future expansion of data fields 

• Using flags to prevent program crashes 

• Date setting, printer on-line and many other routines to make a pro- 
gram run like a commercially written program 

VOLUME I $29.95 

Option Vol. I Program Disk 

TRS-80 Model l/lll $28.50 

TRS-80 Model II $32.50 



Volume II 
ADVANCED FILE HANDLING TECHNIQUES 

Relational database programming 

Comprehensive self-balancing accounting system with printouts 

Hashcoded data file manipulation — (probably the fastest method of 

data retrieval) Hashing the input key and recovery method explained 

Span-blocking techniques allow creation of records longer than 256 

bytes without wasted space 

Blocking & Deblocking 

Shell-Metzner sort 

In-place screen editing 

Recovery of deleted record space 

Alpha-index record retrieval 

Fast machine language/BASIC sort 

Linked list record structure and sort-merge, deleted record removal 

and file reorganization 

Multi-key file reorqanization and record searching 



VOLUME II $29.95 

Optional Vol. II Program Disk 

TRS-80 Model l/ll/lll $49.95 
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••• All PRICES A SPECIFICATIONS SUBJECT TO CHANGE ™* 
DELIVERY SUBJECT TO AVAILABILITY 

ADO $3 00 FOR SHIPPING IN UPS AREAS 
* ADD * ADD $4 00 FOR COO OR NON-UPS AREAS 

ADD $5 00 TO CANADA ft MEXICO 
ADD PROPER POSTAGE OUTSIOE OF U S . 
CANADA ft MEXICO 



the string area. For example, add this 
line to Listing 2: 

15 Y$= "STRING DEFINED IN PROGRAM" 

You won't see Y$ displayed on the 
screen, because it's not stored in the 



reserved string memory area. 

Second, the computer manipulates 
only the strings inside the string area 
during garbage collection. Therefore, 
if you could get the values for A$ in 
Listing 1 to reside outside string mem- 
ory, the memory area wouldn't fill up, 



Program Listing I. Demonstration of garbage collection delays in a simple string operation 
loop. 



10 CLS:PRINT TAB(9) ;"**** GARBAGE COLLECTOR DEMONSTRATION ****":PR 

INT:PRINT:PRINT 

20 CLEAR 1500:DIM A$(1000) 

30 PRINT "PHASE 1 : ASSIGN VALUES TO 1000 STRINGS" 

40 PRINT "START : ", 'RIGHTS (TIMES, 8) ; 

50 FOR I%=1 TO 1000:A$(I%)=CHR$(64+RND(26)) :NEXT 1% 

60 PRINT " END : "; RIGHTS (TIMES, 8) : PRINT:PRINT 

70 PRINT "PHASE 2 : EXECUTE SIMPLE STRING OPERATIONS 100 TIMES" 

80 PRINT "START : " ;RIGKT$ (TIMES, 8) ; 

90 FOR I%=1 TO 100 

100 X$*TIME$:Y$«RIGHT$(X$,8) 

110 PRINTe960,I%,Y$,A$(I%) ; 

120 NEXT 1% 

130 PRINT?960,CHRS(31) ; :PRINT §597," END : " ; RIGHTS(TIME$, 8) ; 

140 PRINT: PRINT: END 

End 



**** GARBAGE COLLECTOR DEMONSTRATION **** 



PHASE 1 : ASSIGN VALUES TO 1000 STRINGS 
START : 00:03:18 END : 00:03:34 



PHASE 2 : EXECUTE SIMPLE STRING OPERATIONS 100 TIMES 
START : 00:03:34 END : 00:16:32 



Figure I. Screen display after Program Listing I runs. 



Program Listing 2. Demonstration of string memory management. 



10 CLS:CLEAR 64 

20 PRINTgB, "*** STRING MEMORY MANAGEMENT DEMONSTRATION ***" 
30 TM=PEEK(16561)+256*PEEK(16562) : 
FF=PEEK(16598) +256*PEEK(16599) : 
BM=PEEK(16544) +256*PEEK ( 16545) +1 
40 PRINT@128, "Top of string memory =";TM: 
PRINT "First free location =";FF: 
PRINT "Bottom string memory =";BM 
50 PRINT-.PRINT "Memory contains :":PRINT 
60 FOR I*BM TO TM:IF I OFF THEN PRINT "x" ; 

ELSE Il=I+(65536) *(I>32767) :PRINT CHR$(PEEK (II) ) ; 
70 NEXT I 

80 X$-"":PRINT S640 ,CHR$ ( 31) ;: INPUT "Input any data string ";X$ 
90 GOTO 30 



and the computer wouldn't call the 
garbage collection routine. 

One solution is to put the values in- 
side the program in data statements 
and use Basic's editing features to up- 
date your data. While that approach 
might work in some applications, it's 
not practical for others. When sorting 
a file, for example, you can't easily 
convert the sort keys into data state- 
ments. An alternative is to protect 
enough high memory to accommo- 
date all keys, and move them to that 
area as the computer reads them from 
disk. 

There's a simpler way — redefining 
the top of protected memory during 
execution, thereby hiding the string 
values from the garbage collector. To 
see how this works, add these lines to 
Listing 1: 

62 Bl =PEEK( 16561 ):B2 = PEEK( 16562) 
65 POKE 16561, PEEK(16598):POKE 16562. 

PEEK( 16599) 
135 POKE 16561. BI:POKE I6562.B2 

Line 65 is the important one. Exe- 
cuted after the 1,000 A$(l%) values 
are in place, it takes the first free loca- 
tion (1,000 bytes below the top and 
500 bytes above the bottom of the re- 
served memory area) and makes it the 
new top of the string area. 

When the system calls the garbage 
collector routine, it reads the top-of- 
memory address from 16,561 and 
16,562 and determines that it must 
clear only 500 bytes. The routine 
therefore works on only two strings 
(X$ and Y$), leaving A$(l%) alone. 

Lines 62 and 135 restore the original 
top of memory-. You can omit them if 
you reset the system before each pro- 
gram run. 

Try running Listing 1 again with the 
three new lines. Look at the new exe- 
cution time for the loop in lines 
90-120. It drops from 11 minutes to 
five seconds! 

Other Maneuvers 

Sometimes you can't input large ar- 
rays at the beginning of a program. 
But you can still trick the garbage col- 
lector by defining null strings of the 
appropriate length at initialization, 
and using LSET (which doesn't change 
string addresses) to assign values to 
these strings. 

Program Listing 3, which contains 
a loop that alternates assigning 1,000 
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BUSINESS PAC 100 




^ssedurflhin 24-Hour, 
* AH order, pr^arante. 
30-Day "»° ney «*■ 



100 Ready-To-Run 
Business Programs 



(ON CASSETTE OR DISKETTE) Includes 128 Page Users Manual 

Inventory Control Payroll Bookkeeping System Stock Calculations. 

Checkbook Maintenance Accounts Receivable — Accounts Payable 



BUSINESS 100 PROGRAM LIST 



NAME DESCRIPTION 

1 RCILE78 Interest Apportionment by Rule of the 78s 

2 ANNG 1 Annuity computation program 

3 DATE Time between dates 

4 DAYYEAR Day of year a particular date falls on 
b LEASEJhT Interest rate on lease 

6 BREAKEVTH Breakeven analysis 

7 DEPRSL StraighUine depreciation 

8 DEPRSY Sum of the digits depreciation 

9 DEPRDB Declining balance depreciation 

10 DEPRDDB Double declining balance depreciation 

1 1 TAXDEP Cash flow vs depreciation tables 

1 2 CHECK2 Writs NEBS checks along with daily register 

13 CHECKBK1 Checkbook maintenance program 

14 MORTGAGE/A Mortgage amortiiation table 

1 5 MULTMON Computes time needed for money to double, triple. 

1 6 SALVAGE Determines salvage value of an investment 

1 7 RRVARIN Rate of return on investment with variable inflows 

18 RRCONST Rate of return on investment with constant inflows 

1 9 EFFECT Effective interest rate of a loan 

20 FVAL Future value of an investment (compound interest) 

2 1 FVAL Present value of a future amount 

22 LOAMPAY Amount of payment on a loan 

23 REGWTTH Equal withdrawals from investment to leave over 

24 SIMPDISK Simple discount anarysis 

25 DATEVAL Equivalent & rtonequivalent dated values for oblig. 

26 ANNUDEF Present value of deferred annuities 

27 MARKUP % Markup analysis for items 

28 SINKFCJND Sinking fund amortization program 

29 BONDVAL Value of a bond 

30 DEPLETE Depletion analysis 

31 BLACKSH Black Scholes options anarysis 

32 STOCVAL1 Expected return on stock via discounts dividends 

33 WARVAL Value of a warrant 

34 BONDVAL2 Value of a bond 

35 EPSEST Estimate of future earnings per share for company 

36 BETAALPH Computes alpha and beta variables for stock 

37 SHARPE 1 Portfolio selection modeli e what stocks to hold 

38 OPTWRfTE Option writing computations 

39 RTVAL Value of a right 

40 EXPVAL Expected value anarysis 

4 1 BAYES Bayesian decisions 

42 VALPRINF Value of perfect information 

43 VALADINF Value of additional information 

44 UTILITY Derives utility function 

45 SIMPLEX Linear programming solution by simplex method 
4b TRAMS Transportation method for linear programming 

47 EOQ Economic order quantity inventory model 

48 QUEUE 1 Single server queueing (waiting line) model 

49 CVP Cost-volume-profit analysis 

50 CONDPROF Conditional profit tables 

51 OPTLOSS Opportunity loss tables 

52 FQUOQ Fixed quantity economic order quantity model 

53 FQEOWSH As above but with shortages permitted 

54 FQEOQPB As above but with quantity price breaks 

55 QXJEUECB Cost-benefit waiting line analysis 

56 NCFANAL Net cash flow analysis for simple investment 

57 PROF1ND Profitability index of a project 

58 CAPI Cap Asset Pr. Model analysis of project 



59 WACC Weighted average cost of capital 

60 COMPBAL True rate on loan with compensating bal. required 

61 DISCBAL True rate on discounted loan 

62 MERGANAL Merger anarysis computations 

63 FIN RAT Financial ratios for a firm 

64 NPV Net present value of project 

65 PR1NDLAS Laspeyres price index 

66 PRINDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 TTMETR Time series anarysis linear trend 

69 TTMEMOV Time series analysis moving average trend 

70 FUPRINF Future price estimation with inflation 

71 MAILPAC Mailing list system 

72 LETWRT Letter writing system links with MAILPAC 

73 SORT3 Sorts list of names 

74 LABEL 1 Shipping label maker 

75 LABEL2 Name label maker 

76 BtlSBUD DOME business bookkeeping system 

77 T1MECLCK Computes weeks total hours from tjmeclock info. 

78 ACCTPAY In memory accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on printer 

80 INVENT2 In memory inventory control system 

81 TELDIR Computerized telephone directory 

82 TIMUSAN Time use analysis 

83 ASSIGN Use of assignment algorithm for optimal job assign. 

84 ACCTREC In memory accounts receivable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of loans 

86 PAYNET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after tax amount 

88 ARBCOMP Arbitrage computations 

89 DEPRSF Sinking fund depreciation 

90 UPSZONE Finds UPS zones from zip code 

91 ENVELOPE Types envelope including return address 

92 AUTOEXP Automobile expense anarysis 

93 INSFILE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAFFD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS Sale-leaseback analysis 

99 RRCONVBD Investor's rate of return on convertable bond 
100 PORTVAL9 Stock market portfolio storage-valuation program 
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*** STRING MEMORY MANAGEMENT DEMONSTRATION *** 

Top of string memory = 65529 
First free location = 65492 
Bottom string memory = 65466 

Memory contains : 

xxxxxxxxxxxxxxxxxxxxxxxxxxxTHIRD STRINGSECOND STRINGFIRST STRING 

Input any data string ? . 

Figure 2. Sdcen display after three inputs to Program Listing 2. 



Program Listing 3. Demonstration of garbage collet lion delays in a loop alternating string as- 
signments and operations. 



10 CLS:PRINT TAB(6) ;"**** GARBAGE COLLECTOR DEMONSTRATION #2 ****" 

: PRINT: PRINT: PRINT 

20 CLEAR 1500:DIM A$(1000) 

30 PRINT "EXECUTING LOOP WITH STRING ASSIGNMENTS k OPERATIONS" 

40 PRINT "START : ", -RIGHTS (TIMES, 8) ; 

50 FOR I%=1 TO 1000 

60 AS(I%) =CHR$(64+RND(26)) 

70 XS=TIME$:YS=RIGHT$(X$,8) 

80 PKINTP960,I%,YS,A$(I%) ; 

90 NEXT 1% 

100 PRINT@960,CHRS(31) ;:PRINT @341," END : "; RIGHTS (TIMES , 8) ; 

110 PRINT:PRINT:END 

I ml 



Program Listing 4. Demonstration of string memory partition technique. 



10 CLS:PRINT ■ **** GARBAGE COLLECTOR DEMONSTRATION 13 ****": 

PRINT: PRINT: PRINT 

20 CLEAR 4500:DEFINT A,H,L:DIM A$(1000) 

30 GOSUB 10000 'DIVIDE MEMORY 

40 PRINT "LOOP TO ASSIGN RANDOM LENGTH STRINGS AND DO OTHER OPERAT 

IONS" 

50 PRINT "START : " ; RIGHTS (TIMES , 8) ; 

60 FOR I% = 1 TO 1000:A$=STRING$(20,"X") : B$»LEFT$ (AS, 6) 

70 GOSUB 11000 'TAKE "HIGH" AS CURRENT REGION 

80 A$(I%)=STRING$(RND(6) ,64+RND(26)) ' < A$(I%) TO "HIGH" 

90 GOSUB 12000 'RESTORE "LOW" AS CURRENT REGION 

100 XS*TIME$:Y$=RIGHT$(X$,8) 

110 PRINT0960,CHR$(31) ; 1% , YS, AS ( 1%) ; 

120 NEXT 1% 

130 PRINT§960,CHRS(31) ;: PRINT £341," END : " ;RIGHTS(TIMF$, 8) ; 

140 GOSUB 11000 'RESTORE HIGH TOP OF MEMORY 

150 PRINT:PRINT:END 

9990 '***** PARTITION MEMORY t. SET "LOW" AS CURRENT REGION ***** 

10000 AT=16561:AF=16598:H1-PEEK(AT) : H2-PEEK ( AT+1) : H3-PEEK ( AF) :H4=P 
EEK(AF+1) :TM=Hl+256*H2-4000:L2=INT(TM/256) :Ll=TM-256*L2: POKE AT,Ll 
:POKE AT+1, L2: POKE AF, LI: POKE AF+1 ,L2 :MP$="LOW" : RETURN 

10090 '***** SET "HIGH" AS CURRENT REGION ***** 

11000 IF MP$="HIGH" THEN RETURN ELSE L3=PEEK (AF) :L4-PEEK (AF+1) :POK 
E AT,Hl:POKE AT+l,H2:POKE AF,H3:POKE AF+1 ,H4 :MP$= M HIGH" : RETURN 

11190 '***** SET "LOW" AS CURRENT REGION ***** 

12000 IF MP$="LOW" THEN RETURN ELSE H3=PEEK (AF) :H4=PEEK (AF+1) : POKE 
AT, LI: POKE AT+l,L2:POKE AF,L3:POKE AF+1 ,L4 :MP$«"LOW" tRETURN 



A$(I°7o) values with other string oper- 
ations, takes an exasperating 34 min- 
utes to run. But add the following 
lines: 

42 FOR l°?o = 1 TO 1000:AS(I /o) = STRINGS 

(1,0): NEXT I°o 
44 Bl = PEEK* 16561 ):B2 ■ PEEK( 16562) 
46 POKJi 16561, PEEK(I6598):POKE 16562, 

PEEK( 16599) 
105 POKE 16561, Bl:POKE I6562.B2 

and modify line 60 to read: 

60 LSET A$(l o; o) = CHR$<64 t RND<26)) 

Now the program takes only one min- 
ute 1 1 seconds to run. 

Line 42 generates 1,000 null strings 
one character long in string memory. 
Line 60 determines the characters that 
fill these null strings. 

Even this method has limitations, 
since you must know the length of the 
variables in advance. However, once 
you understand the general principle, 
you should have no trouble cooking 
up solutions to fit your own programs. 

As a final and more sophisticated 
example, Program Listing 4 shows 
how to split a 4,500-byte string area in 
two; the high area contains 4,000 bytes 
and the low area contains 500. To 
keep the program readable, 1 used 
subroutines for the various PEEKs 
and POKEs. The initial GOSUB 
10000 statement sets the low area as 
the current string area. AH operations 
are performed there until GOSUB 
11000 switches the string area to the 
high region. GOSUB 12000 switches 
the current string area back to the 
low area. 

The program stores 1,000 A$(I%) 
values of random lengths (range 1-6) 
in the high region and performs all 
other operations in the low area. You 
can store data at will in one partition 
or the other, out of the way of the gar- 
bage collector. 

When your computer seems to go 
into suspended animation, it's more 
than likely that garbage collection is to 
blame. In many cases, a minor change 
in your program can mean a major 
saving of time. ■ 



Thomas P. Eggarter is a Systems 
Analyst for Chantadata Inc. and a 
professor of physics at Universidad 
Nacional de San Luis, Argentina. 
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Disks 



■ Edit (Zap) Sectors 

■ Powerful Disk Formater 

menu driven with help command for the novice 

short cuts for the experienced user 

self booting, does not require DOS 

simultaneous Hex and ASCII display 

reads SO, DO or Mixed Density with auto density detect 

reads single or double sided, 5 1/4" or 8" disks 

YOU CAN NOW 



Read, edit, write and step through sectors 

and Irackslincludinq inlormation between sectors) 
Duplicate most CP/M" disks for other P.C.'s 
Duplicate standard lormat, special format & data disks 
Identify protection secrets and create your own schemes 
Read track address; see actual track and sector numbers 
Repair CRC errors 
Cxchange data address marks 
Tormat 128, 256, 512 or 1024 byte sectors 
Interface with Monitor/Disassembler 
Analyze unknown DOS systems 
Write special tracks; make protected disks 
Print video display through RS252 or parallel port 



^»265 



AND MORE 



INTRODUCTORY OFFER 



$33.50 



for unprotected disk and 31 -page manual 






VISA 



Tennessee residents include 4.5S sales tax 
For personal checks allow 2 weeks 
Specify TRS-80* model I, III, or 4 III 

•TR5-80 trademark Tandy Corp. 



(613)482-2007 
RIDGE-TEC, INC 
740 RoberUville Road 
Oak Ridge, TN 37B30 

"♦CP/M trademark Digital Research Corp. 



•JUKI 



.'.Ml f 1 I'K".' j U 



MODEL dOO 

Word Processing and 

Graphic Functions 

Printing Speed of 18 cps 

100 Character Daisywheel, 

10/12/15 Pitch 

Compatible to IBM, Apple, 

Osborne, Kaypro.TRS-80 

Model III and 4, etc. 

Proportional Spacing Mode 

Utilizes IBM Selectric Ribbons 



ofis»«s sraiiars 

JUKI 6100 (P) $459 

nrg^-fPCK & 24, 5 1/4 

DISKEnES LXBTFREE 
SKK¥£BXK $40 



LIST SE'PT-DfTC 



printers 
Juki printer «.p> 
juki printer is) 

plotters 

rttNNESrVINN TALLY 
I1TC-P3P 3Ptn aColor, 
8IN Plotter, Para! Id 
Inter fact 

HTC-P3S 3P*n 8Co I or, 
81N Plotter, S«r ial 
9S- 232 

0ISK-PACV HOLDS 24 3 J 
DISKETTES BOOK 

DISKETTES 
3 1/4 BULK DISKETTES 

niK 23 81.20 

BOX OF 18 m In 3 boxci 



439 

5^B 



633 



3B 
43 



OR ICES 
BEAR 3 i'4 TAHOON 40TRACK 
DRIUES 5„ OR TEAC \/2 HI 
SINGLE HEAD DRIUE 169 

n£6ADiSK TRsee ibm apple 

3nfl(.f0RnATCDJ 939 

IBMBtFORflATED) 1,239 

UNINTERRUPTIBLE P0UER 
SENTRY LINE U.P.S. 
!88 UATT 28 *ln POWER 243 

288 UATT 38 «lr> POUER 313 

4BB UATT J 2 «!n POUER 323 

PRICES ARE SUBJECT TO CHAN6E 
WITH OUT NOTICE 



MAY. COMPUTING 



P.O. BOX 2024 *«« 

FALL RIVER, MA 02722 





617-675-3944 ORDER & INFO. 5PM TO 10PM 
800-821-5226 EXT. 405 ORDER DESK ONLY 



Orde>-i on Uita. 
PRICE do«i not 



Care) IADD 3>. 



Ur or c«rt;f;«a ctuck 
ip UPS.Co»pany t Pertona 
' a«nt ADO 3>. SALES TAX 



NOW You can 

have a UNIQUE 

& Powerful 
NETWORKING 

built into Radio 

Shack Models 

III & 4. 



MASTER 



SATELLITE 



FLOPPY DRIVES 



SATELLITE 




TYPICAL 
CONFIGURATION 



HIGH SPEED SERIAL BUS (TWISTED PAIR) 

After comprehensive field testing in medical & legal offices, PSM, Inc. is releasing the technology necessary to 
expand the capabilities of your Model III/4 to MULTI-USER, MULTI-PROCESSING, SHARED DATA APPLICATIONS 
using Winchester 5.25" hard disks. Each workstation is a complete, independent computer which is tied to the hard 
disk through a high-speed serial bus. Workstations DO NOT NEED ANY DISK DRIVES; they will boot up properly 
through the serial bus from the hard disk. It will be running under LDOS as if the hard disk was its drive: ! 



FEATURES 



• Protects existing software investment 

• Data file sharing 

• Compatible with LDOS 5.1.4 



Shared hard disk [5 to 20 megabytes] 

File/record lockout capability 

Used in active medical offices since 2/83. 



PSM-W5: Model 4 w/64k RAM, 40trk DS Floppy, built-in 5 Mbyte hard disk, master network 

controller, LDOS 5.1 .4, Technical Manual $4,975.00 

PSM T/0: Model 4 w/64k RAM, boot PROM, satellite network controller, Tech Manual $1 ,875.00 

PSM-U5: PSM upgrade of your Model III/4 w/64k RAM to PSM-W5: incld's 5Mb hard disk, hard 

disk controller, master network controller, LDOS 5.1.4, power supplies, Tech Manual .... 
PSM-U0: PSM upgrade of your Model Ml/4 w/64k RAM to PSM T/0: incld's boot PROM, satellite 

network controller, Tech Manual 

PSM-NM: Technical Manual: Incld's complete description of PSM networking, and application 

implementation. Tech Manual purchase will be credited toward later hardware purchase. . $20.00 



$2,625.00 



$665.00 



—i^^^ ^ ^ • All shipping and handling charges are the customers' responsibility. 

■ '^jrim /■P"->K ramm ' n K Technical consultation services available. Modification of Model III; 4 to 

I ^^kl »/■ and systems implement networking will void the Tandy warranty. 

I manaReme» ,mc. 386g |ND|AN R , PPLE RD DAYTON, OH 45440 [513] 426-8644 ^ 42 

Radio Shack is a trademark ol the TANDY CORP. LDOS is a trademark ot LOGICAL SYSTEMS, INC. 



*• See List of Advertisers on Page 176 
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Tape Check gives you something Radio Shack's 
Series I Editor/ Assembler doesn't — a utility 
that checks for errors generated in trans- 
ferring source code from EDTASM's 
buffer to tape. 



Tape Me, I'm Yours 



adio Shack's Se- 
ries I Editor/ As- 
sembler doesn't 
^^^^^^^^^^^1 verify source 
code you record 
from the EDTASM to tape. Since you 
can't tell whether or not EDTASM 
saves a source file properly, you could 
end up with a long source file that 
glitched as you saved it to tape. 

Tape Check, my Assembly- lan- 
guage code verification program, 
checks for a valid source file save (see 
the Program Listing). It works with a 
Series I Editor/ Assembler and your 
48K RAM tape-based Model III. 

Tape Check reads the Assembly- 
language source code saved on your 
cassette and checks it against the 
source code in the EDTASM source 
buffer. The program tells you when it 
detects a discrepancy, allowing you to 
immediately rewind the tape to try and 
record an error- free version of the 
source code. 

Using Tape Check 

Tape Check resides from 0FE0O- 
0FF23 hexadecimal (hex) with an en- 
try point of 0FE96 hex, leaving room 
for your source program. You can re- 
locate Tape Check by changing the 
ORG value in line 400 of the Program 
Listing. 

You must load EDTASM in memo- 
ry before you load Tape Check. The 
program changes the EDTASM tape 
vectors for the Model I/1II ROM to let 
Model III users save source code at 
1,500 baud. EDTASM cannot save 
object code at 1,500 baud, however. 

Line 390 prevents EDTASM from 
writing its symbol table over Tape 
Check. 

To run Tape Check, load ED- 
TASM and then load Tape Check. 



Type in SYSTEM, hit the enter key, 
and type in /19434 to access the ED- 
TASM entry point. You can now key 
in or load your source program. 

After recording a source file to tape, 
exit to Basic. Executing the Q com- 
mand, normally the EDTASM exit 
command, results in a system vector 
loss to Tape Check due to the required 
reinitialization. Rather than use the Q 
command, type in L, hit the enter key 
twice, then hit the break key. This re- 
turns control to the Basic command 
mode and retains the system vector to 
Tape Check. Once you're in Basic, 
type in POKE 16913,1 to get the high 
baud rate. 

You can reenter EDTASM at 4BF6 
hex (19446 decimal) without destroy- 
ing the resident source program. To 
do so, type in SYSTEM, hit the enter 
key, then type in / 19446. To enter 
Tape Check from Basic, type in SYS- 
TEM, hit the enter key, and hit the 
slash key (/) followed by the enter key. 

When you've entered Tape Check, 
it prompts you to prepare the cassette 
and select the high or low baud rate (a 
high baud rate is the default). 

After you respond to the cassette 
prompt, Tape Check displays a verify- 
ing message (a blinking asterisk) and 
the source file name (if you specified 
one), indicating that it's checking the 
newly taped program. 

Tape Check displays a message if 
any errors occur during verification 
and lets you recheck the tape. If you 
still don't get a positive verification, 
you must save the source code again. 

To do this, respond to the cassette 
prompt, press the break key, and enter 
the Basic command mode. Then reen- 
ter EDTASM and save the source code 
to tape again. If the save is error- free, 
Tape Check displays the message 



by Jay Walton 

"Tape Okay" and returns to the ED- 
TASM reentry point. 

Source Buffer Structure 

EDTASM's source code buffer 
starts at 631 1 hex and ends with 2 OFF 
hex bytes. It stores each line of source 
code in the following format: the first 
2 bytes represent the binary line num- 
ber in least significant byte/most sig- 
nificant byte (LSB/MSB) format. The 
third byte represents the total number 
of ASCII bytes and control bytes. The 
bytes following this third byte are the 
actual ASCII and control bytes. The 
control byte (09 hex) represents the tab 
commands between source code 
fields. 

Source File Structure 

The source file created for tape con- 
sists of 255 zero bytes and a 0A5 hex 
synchronization byte as the file leader. 
An ASCII S with bit 7 on (0D3 hex) 
follows the file leader. The program 
then stores the file name specified dur- 
ing the save. 

Each line of source code records to 
tape as a 5-byte line number field fol- 
lowed by one 09 hex byte. The line 
number Ls the ASCII representation of 
the source code number (with bit 7 of 
each byte on). 

For example, the ASCII representa- 
tion for the source code line number 
001 10 is 30H 30H 31H 31H 30H. With 
bit 7 on, it records as BOH BOH B1H 



The Key Box 



LOAD «0 



Model III 
48KRAM 

Assembly Language 

Radio Shack Series I EDTASM 
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LSI Introduces A Toll Free Order Line. 



8970 North 55th Street 



(Orders Only) 



(800) 248-3535 



P.O. Box 23956 



Information phone number (414) 355-5454 



Milwaukee, Wl 53223 Specifications and prices subject to change without notice. c 1984 Logical Systems Inc. 



B1H BOH. The ASCII text then fol- 
lows with the embedded tab control 
codes (09H). 

Each line terminates with a carriage 
return code (C/R, ODH) and the se- 
quence repeats. A 1A hex file termina- 
tor flag byte follows the last C/R 
code. The program doesn't use a 
checksum. 

Verification Errors 

Errors encountered during verifica- 
tion are often due to an improper cas- 
sette output setting. Try readjusting 
the cassette output level and then re- 
verifying the source code. 

If you still don't receive a "Tape 
Okay" message on verification, re- 



cord the source file on a new tape or 
erase the original tape and record 
again. ■ 



You can write to Jay Walton at 112 
Island Drive, Richardson, TX 75081. 





Program Listing. Tape Check program for verifying source code tapes. 




••100 ; VERIFY SOURCE (TAPE CHECK) VERSION 1.1 




■0110 ; BY JAY WALTON 




00120 t 




4646 


00130 EDTASM 


EQU 4646H ; FIRST ADDRESS OF EDTASM 


46 8F 


00140 TPEVEC 


EQU 46 8FH ; EDTASM TAPE VECTORS 


0296 


00150 PNDSYC 


EQU 296H ;FIND LEADER AND SYNC 


0235 


00160 RDBYTE 


EQU 235H ;READ A TAPE BYTE 


02B7 


00170 WRTSYC 


EQU 287H ; WRITE SYNC BYTE TO TAPE 


0264 


00180 WRTBYT 


EQU 26 4H ; WRITE A BYTE TO TAPE 

Listing continued 



A&J Micro Drive exclusive distributor for Exatron. 




Authorized distributor for Holmes Engineering and IJG. 



EXATRON STRINGY FLOPPY 




Model I ESF 8TARTER KIT 

Add $6 SO Shipping, Includes Drive 0. 

Manual, Operating System. Power Supply. Cable 
Data I/O Tape. 5 Micro-waters 



rmso. 



Model I ESF DRIVE 
Add S6 SO Shipping 



Model I ESF DRIVE 1 thru 7 

Add $6 50 Shipping 



7200 Baud Transfer Rate 
No Volume Controls or Rewind 
No Expansion l/F Required 
Automatic Verify with Save 
Uses only 4 Bytes User Memory 
Key Debounce Routine in ESF 

BUS-EXTENDERS 



2for1 $2500 

3for1 $3000 

4for 1 $35.00 

5for1 $4000 

Custom call for prices 



Model I OWNERS MANUAL 



$124.50 



$99.50 



$495 



• 



HOLMES PORTABLE MICRO DRIVE 



■INOINff*ING INC 




MODEL 100 PMD-100 $299.00 

Add $6 50 Shipping. Includes PMD-100 Drive. 
3 Waters AC Adaptor/Battery Charger. 
Power Cable Manual. PMD User Group Membership 



MODEL 100 IM-100 
0K RAM Modules 



$09.50 



High Speed Data Transfer 
Battery Powered with Charger 
No Modification to Model 100 
Saves Text Files and Programs 
Uses Built-in Telecom Mode 



PMD-100 Owners Manual $4.05 



WAFERS 

Wafers are the same as used in Model I ESF . 

Also compatible with OLIVETTI MTU-231. Royal and 

ADLER Tape Drives, and Structure Design SD-2024 

PAL Programmer. Stringy Floppy for TIMEX 1000 and 1500 



MORE FOR MODEL I 



$119.50 
$ 89.50 
$ 1495 



MICRO WAFER 






5 tt 
10 tt 
20 ft 
35 ft 
50 ft 



$3 50 
$3 50 
$4.00 
$4 00 
$4 50 



F? 



PUBLICATIONS 



Holmes IM-2 48K in Keyboard Memory 
Holmes SP-II Computer Speed-Up ... 
Upper/Lower Case Kit 

Installation available toe above items 

The tollowing are registered trademarks 

TRS-80 MicroWater. Stringy Floppy, Scnpa.t. PMD-100 

Prices subiect to change without notice 

J A&J Micro Drive 

I1050E. DuaneAve. Suite I 
Sunnyvale, CA 94086 
a (408) 732-9292 



236 
106 



Model I 
Model 100 



MODEL I ESF SOFTWARE 

Patch R/S ED/ASSEM Version 1.1 and 1.2 $11.95 

IJG Electric Pencil 2 $59.95 

Advanced Programmers Guide $9 95 

File Management System I $19 95 

Patchword (Patch Scripsit 1.0) $ 9 95 

ESFForth $45.00 

Electric Spreadsheet 16K $44.95 

ESF-80 Monitor $ 9 96 

The Basic Toolkit $19.95 

More Software Available 



THE OTHER MYSTERIES SERIES 

TSR-80Disk 

Microsoft Basic Decoded 

The Custom TRS-80 



$2025 
$26.95 
$26 95 



Basic Faster & Better $26.95 

Machine Language Disk I/O $26 95 

TRSDOS 2 3 Decoded $26 95 

BASIC Disk I/O Faster & Better $26 95 

How to do it On The TRS-80 '• 

hyWilliamBarden.Jr $26.00 

Application guide to the TRS-80* 

Models I, II, III, 100 and color computer 



Send $4-95 for Owners Manual and more information 

D Check or Money Order Enclosed 

D COD add$1 65 

D UPS. shipping cost, add $3 00. unless other specified 

I J CA residents add 6 5 % sales tax 

n Charge to my U VISA □ MASTERCARD 

Card* Exp. date 

Name 

Address 

City 



Stata 



Zip 
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[OR THE 



PRODUCTS 



PRICES 

AND SERVICE 

TOO GOOD TO PASS UP! 



TBS80 



® 



SOFTWARE 



NEWDOS80/Vers.2 

COMREFforNewdos80 

LD0S5.1 

DOSPLUS3.5 

DOSPLUSIV 

6.0 Plus 

MICRO CLINIC Mod 1 

MICRO CLINIC Mod 3 

TRASHMAN 

FASTER 

RPM 

MZAL 

DSMBLR III 

TOOLBELT Mod 4 

SUPER UTILITY + 3.2 

NEWBASIC 2.0 

DOTWRITER 4.0 w/Letterset 



$124.95 
13.95 
109.95 
119.95 
119.95 
39.50 
24.50 
28.50 
34.50 
24.95 
22.50 
79.95 
34.95 
39.50 
59.95 
34.50 
84.50 



LAZYWRITER 13995 

ZORLOF II 58.95 

MSCRIPT 68.95 

LE SCRIPT 109.95 

LDOS Utility Disk #1 42.50 

The Toolbox for LDOS 59.95 

EDASIV 84.95 

The BASIC Answer 59.95 

LNDOUBLER 5/8 159.95 
LNDOUBLER 

w/Dosplus 3.5 189.95 
LNW SYSTEM 

EXPANSION II 329.95 

POWERMAIL PLUS 129.95 

OMNITERM 79.95 

MICROTERM 64.95 

CYBERCHESS 27.95 

Tallymaster 62.95 
SBSG Accounting Modules 

Model 1 or 3 175.00 

Model 2 250.00 

VERBATIM DATALIFE DISKS 

5" SS/DD $23.75 

5" DS/DD $35.75 



ENBase 

ENB is a true relational data base manager that 
can handle data interdependences of any com- 
plexity Instead of storing data as individual 
records, ENB uses a linking system to relate data 
to each other II your needs are complex. ENB 
is for you Data files can span disk drives, includ- 
ing hard disk (Requires 48K. Allen Gelder Soft- 
ware.) 

$134.95 



MAXI MANAGER II 

MAXI MANAGER II offers significant .approve- 
ments over the previous version It is 20-30% 
faster and can be used on a hard disk drive 
Depending upon your disk space. MAXI MAN- 
AGER II allows you to create up to 32.700 rec- 
ords with up to 50 fields each (800 character max- 
imum per record) Print reports in any format you 
choose, even merges with popular word pro- 
cessors for ' non-form" letters (Requires 48K. 
Adventure International I 



$149.95 



Newscript7.1 99.95 

Newscript 7.1 plus Labels 114.95 

NewscriptDW Proportional 39.95 

Newscript FileConverter 19.95 




Electric Webster + Corrections 1 19.50 
Elec. Webster Grammar 39 95 

Elec. Webster Hyphenation 39.95 

WRITE FOR OUR 
FREE CATALOG 



MAXI CRAS 

Computerize your finances' MAXI CRAS will write 
your checks, record income and expenses by 
category, and presents reports you need to 
analyze your financial activity. Income and 
expenses may be assigned to any one or more 
of up to 223 accounts 

$79.95 

The USR* Friendly Modem 
PASSWORD 

Your PASSWORD to the diverse services ot infor- 
mation networks such as the CompuServe and 
local bulletin boards It has all the features includ- 
ing automatic tone or pulse dialing, automatic 
answering, and can even adjust to either 300 or 
1200 baud Password has an audio phone line 
monitor, and is compatible with Hayes Smart- 
modem commands Two year warranty. (U.S. 
Robotics. Inc.) 



$349.95 



VOLKSMODEM 

The affordable 300 baud modem that speaks 
everyone's language. Operates at full or half 
duplex, automatic selection of originate/answer 
modes Requires 9 volt battery (not included). 
Volksmodem is a perfect choice for your first 
modem (Anchor Automation. Inc.; Cable is $1 1 .95 
extra I 

$69.95 

PROWRITER 

Get the best price on an industry standard dot 
matrix printer The PROWRITER gives you speed 
(120 CPS). 5 character sets, 8 character sizes, pro- 
portional spacing, and built-in graphics capability 
Operates with friction feed or a built-in adjustable 
tractor One year warranty (C Itoh 8510 10" 
carriage ) 

$389.95 

NETWORX 

A vortage surge and interference filter that can pro- 
tect your computer circuitry as well as your valu- 
able data NETWORX provides four outlets to 
provide filtered power to your computer's acces- 
sories as well Unique mounting hardware allows 
the illuminated switch to be placed at the front of 
the workstation (Diahght Corp.) 



S59.95 



Free Shipping on Orders over S100 
Friendly, Honest. Reliable Service 



Toll Free Order Line 
Free Use of Credit Cards 



24-Hour Shipping for Items in Stock 
Large Selection-Call for Items Not Listed 



We accept Visa, Master Card, check, cash, money 
orders, and COD In the 48 continental States add S2 50 
for UPS standard shipping, we'll pay shipping if your 
crdc 5 ever S100 Alaska and Hawaii orders are 
Charged actual shipping charges COD orders are 
charged an extra $2.00 and require cash or certfed 
chcc* on delive'y POs accepted upon app'oval 

When cde'ing by ma i nclude you* telephone num- 
ber ced I ca'd 'nlo'ma! on computer modei memory 
sze, and nurr.oe' of dn'ves. Co'orado r es dents add 
app'cor ate sales tax (6' 7°: m Denveri 

p 'ices are sub|ect to change without notice 



ff.'!«r," 1-800-468-4474 



AMI 



applied 

microsystems, 

inc. 

COLO CALL 861-9250 612 Washington, Denver, CO 80203 



-390 



TRS-M is d TM ot Tandy Corp 



■EWSCRIPT is a TM of Prosoft 



MODEL I/III* 



BEA. 



Model 2000 
Apple Mac 
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'With Southern Software's 

ACCEL3/4 

Basic Compiler 

For instance, we compiled this 
benchmark Basic program from a 
May 1984 80 Micro article (pp 96- 
100) We didn't change a line Com 
pilation took less than 1 second 
withonly 18% code expansion And 
what perlormance results! The pro- 
gram ran 3 TIMES FASTER than the 
Model 2000 and 20 TIMES FASTER 
than the original Mod I/TO uncom 
piled version 

ACCEL3/4 is the PRACTICAL way to get 
better performing Basic programs 

• Easy to use, on-line with Basic 
quick compilation 

• Ultra-acceptant accepts the whole 
Basic language (and many non- 
standard Basic extensions) 

• Huge speedups programs 2-200 
times taster 

• Low code growth programs only 
10-50% larger than original (plus 
1 5K runtime module) Can com- 
pile 25k • Basic programs 

• No royalties on compiled code 



ACCEL3/4 
all dos 



Mod Lin 



s 2s/h 



EDIT 

Full screen editor tor basic and 
SBE programs Links with Basic 
for an on-line expert word- 
processor. FAR better program- 

4)0 



ming productivity 



•3% the cost of a Model 2000! 

(415)681-9371 -''«' 



Allen Gelder Software 

Box 11721 San Francisco CA 94101 



Listing continued 



28A7 


00190 VDLINE 


EQU 


28A7H 


0033 


00200 VDCHAR 


EQU 


33H 


01C9 


00210 VDCLS 


EQU 


1C9H 


3042 


00220 CASS 


EQU 


3042H 


6311 


00230 EDTBUF 


EQU 


6311H 


01F8 


00240 CASOFF 


EQU 


1F8H 


4020 


00250 CURPOS 


EQU 


4020H 


4C2A 


00260 EDTRET 


EQU 


4C2AH 


001A 


00270 ENDFLG 


EQU 


26 


00D3 


00280 HDRBYT 


EQU 


211 


0009 


00290 NUHTRM 
00300 ; 


EQU 


9 


46 8P 


00310 


ORG 


TPEVEC 


468F C39602 


00320 


JP 


FNDSYC 


4692 C33502 


00330 


JP 


RDBYTE 


4695 C38702 


00340 


JP 


WRTSYC 


4698 C36402 


00350 


JP 


KRTBYT 


469B C3P801 


00360 
00370 ; 


JP 


CASOFF 


4BF9 


003 80 


ORG 


4BF9H 


4BF9 11FPFD 


00390 


LD 


DE,VERCHK-1 


FE00 


00400 
00410 ; 


ORG 


0FE00H 




00420 "LIST OFF 






00570 »LIST ON 




FE96 314646 


005 80 TPECHK 


LD 


SP, EDTASM 


FE99 CDC901 


Ifl M 


CALL 


VDCLS 


FE9C 2128FE 


00600 


LD 


HL, READY 


FE9F CDA728 


00610 


CALL 


VDLINE 


FEA2 CD4230 


00620 ENTRY 


CALL 


CASS 


FEA5 3E0F 


00630 


LD 


A,0FH 


FEA7 CD3300 


00640 


CALL 


VDCHAR 


PEAA 2153FE 


00650 


LD 


HL, VERIFY 


FEAD CDA728 


00660 


CALL 


VDLINE 


PEB0 2A2040 


00670 


LD 


HL, (CURPOS) 


FEB3 DD211163 


006 80 


LD 


IX, EDTBUF 


FEB7 CD9602 


00690 


CALL 


FNDSYC 


FEB A CD3S02 


00700 


CALL 


RDBYTE 


FEBD FED3 


00710 


CP 


HDRBYT 


FEBF 204C 


00720 


JR 


NZ , ERROR 


FECI 0606 


00730 


LD 


B,6 


FEv.3 CD3502 


00740 NAME 


CALL 


RDBYTE 


FEC6 77 


00750 


LD 


(HL) ,A 


FEC7 23 


00760 


TNC 


HL 


FEC8 10F9 


00770 


DJNZ 


NAME 


FECA CD3502 


007 80 GETNXT 


CALL 


RDBYTE 


FECD FE1A 


00790 


CP 


ENDFLG 


PECP 2847 


00800 


JR 


Z,TERM 


FED1 210000 


00810 


LD 


■L.I 


FED4 0605 


00820 


LD 


B,5 


FE06 54 


00 830 LINENO 


LD 


D,H 


FED7 5D 


00840 


LD 


l,L 


FED8 29 


00850 


ADD 


HI,, 111 


PED9 29 


00860 


ADD 


HL,HL 


FEDA 19 


00870 


ADD 


HI.,DE 


PEOB 29 


00880 


ADD 


HL,HL 


FEDC E67F 


00890 


AND 


7FH 


FEDE D630 


00900 


SUB 


30H 


FEE0 5F 


00910 


LD 


E,A 


FEE1 1600 


00920 


LD 


D,0 


FEE3 19 


00930 


ADD 


HL,DE 


FEE4 CD3502 


00940 


CALL 


RDBYTE 


FEE7 10 ED 


00950 


DJNZ 


LINENO 


FEE9 FE09 


00960 


CP 


NUMTRM 


FEEB 2020 


00970 


JR 


NZ, ERROR 


FEED 7D 


00980 


LD 


A,L 


FEEE DDBE00 


,'!."> >U' 


CP 


(IX) 


FEF1 201A 


01000 


JR 


NZ , ERROR 


FEP3 DD23 


01010 


INC 


IX 


FEF5 7C 


01020 


LD 


A,H 


FEF6 DDBE00 


01030 


CP 


(IX) 


FEF9 2012 


01040 


JR 


NZ, ERROR 


FEFB DD23 


01050 


INC 


IX 


FEFD DD23 


01060 


INC 


IX 


FEFF CD3502 


01070 GETDAT 


CALL 


RDBYTE 


FF02 FE0D 


01080 


CP 


0DH 


FF04 28C4 


01090 


JR 


Z, GETNXT 


FF06 DDBE00 


01100 


CP 


(IX) 


FP09 DD23 


01110 


INC 


IX 


FF0B 28F2 


01120 


JR 


Z, GETDAT 


FF0D CDP801 


01130 ERROR 


CALL 


CASOFF 


PF10 2100FE 


01140 


LD 


HL,ERRMSG 


FF13 CDA728 


01150 


CALL 


VDLINE 


FF16 188A 


01160 


JR 


ENTRY 


FF18 CDF801 


01170 TERM 


CALL 


CASOFF 


FF1B 213FPE 


01180 


LD 


HL,TAPE0K 


FP1E CDA728 


01190 


CALL 


VDLINE 


FF21 C32A4C 


01200 


JP 


EDTRET 


FE96 


01210 


END 


TPECHK 


00000 Total 


Errors 







;WRITE (HL) TO VIDEO 

; DISPLAY CHARACTER IN A 

.■CLEAR DISPLAY 

/<H/L> CASS PROMPT 

;STRT OF EDTASM SRCE BUFF 

;TURN OFF CASSETTE 

;DCB CURSOR POSITION 

/ EDTASM RE-ENTRY POINT 

; SOURCE TAPE END FLAG 

; 'S' WITH BIT 7 ON 

; NUMBER STRING TERMINATOR 

; POINT TO EDTASM TPE VEC. 

;USE MODEL III ROM 

; ROUTINES 

;F0R TAPE 

.•OPERATIONS 

j AND CONTROL 



; OBJECT LOAD POINT 



; STACK BELOW EDTASM 

; CLEAR DISPLAY 

; POINT TO CASSETTE READY 

•WRITE IT 

•Cass? PROMPT <H/L> 

;OFF CURSOR CHARACTER 

j WRITE IT 

; POINT TO VERIFY MESSAGE 

/WRITE IT 

;GET CURSOR POS AFTER MSG 

/ POINT TO EDTBUF START 

/FIND TAPE SYNC PULSE 

;READ BYTE FOR 'S' W/B 7 

»IS IT 'S' W/B 7 ON? 

;IF NOT, GO WRITE ERROR 

/GET READY FOR 6 BYTE NME 

;GET CHARACTER OF NAME 

;PUT IT ON DISPLAY 

,-BUMP DISPLAY POINTER 

;DO AGAIN FIVE MORE TIMES 

j GET NEXT BYTE 

;IS IT ENDFLG? 

j IF SO, END VERIPY 

;ELSE, INITIALIZE ACCUM. 

;WE WILL GET FIVE BYTES 

I MOVE ACCUM VALUE TO DE 

; DB - HL 

/DOUBLE ACCUM HL = 2*DE 

; AGAIN HL - 4*DE 

;ADD DE TO IT HL - 5*DE 

/DOUBLE IT HL=10*DE 

; STRIP OUT BIT 7 OF BYTE 

/CONVERT IT TO BINARY 

/PUT IT IN DE FOR 

/ ADD IN NEXT STEP 

/ADD IT TO ACCUM 

/GET NEXT BYTE 

/DO AGAIN UNTIL DONE 

/IS LAST BYTE NUMTRM? 

/IF NOT, ERROR 

/ELSE, GET LSB OF LINE 

/IS IT IN EDTBUP? 

/IF NOT, ERROR 

/ELSE, BUMP EDTBUF PNTR 

/ AND GET MSB OF LINE 

/IS IT IN EDTBUF? 

/IF NOT, ERROR 

/ELSE, BUMP EDTBUF PNTR 

/ AND AGAIN PAST LNGTH BYT 

/GET NEXT BYTE 

/IS IT C/R? 

/IF SO, GET NEXT LINE NO. 

/ELSE, IS IT IN EDTBUF? 

/BUMP EDTBUF POINTER 

/IF IN EDTBUF, GET NEXT 

/ERROR-TURN OFF CASSETTE 

/POINT TO ERROR MESSAGE 

/WRITE IT 

/AND GO TRY AGAIN 

/TERM-TURN OFF CASSETTE 

/POINT TO 'OKAY' MESSAGE 

/WRITE IT 

/AND RETURN TO EDTASM 

/ENTRY FOR TPECHK PRGM 



Lmt 



96 • 80 Micro, November 1984 



GREAT IDEAS 

A DISK 






GREAT IDEAS 
A CASSETTE 



NOW, you can load the major programs from 80 MICRO — automatically. 



LOAD 80 is a collection of the major programs from each 
issue of 80 MICRO including: tutorials. . .utilities. . .games 
...home-hobby applications ... word processing programs... 
and more. Each program is on a formatted disk or cassette 
and ready to run. . .saving you hours of key-in time. And 
Model III users can now run LOAD 80 automatically— our 
new disk transfer system eliminates conversions. 

For less than $2.00 per program LOAD 80 gives you a 
library of over 100 quality programs in just 12 months — de- 
livered to your home each month 

Plus, a year's subscription to LOAD 80 saves you nearly 
30% off the single disk or cassette price— that's enough for a 
year's subscription to 80 MICRO. 

Your LOAD 80 comes complete with user support. Just 
call 1-603-924-9471 any business day and you'll receive prompt 
assistance from our LOAD 80 staff and the 80 MICRO 
Technical Editors. 

To get your time-saving subscription or monthly issue of 
LOAD 80 call toU free 1-800-258-5473 (in New Hampshire 
dial 1-924-9471). Or fill out this coupon and send it in today. 



YES! Save me time. Save me money with LOAD 

□ YES! I like saving time and money. Send me a 
year of LOAD 80 on disk for $199.97. 
YES! I need this lime saver and want to save 30% 
off the single cassette price. Send me a year of 
LOAD 80 on cassette for $99.97. 
YESI I want LOAD 80 to save me money. 
Send me this month's LOAD 80 disk for 
$21.97 which includes postage and handling 

□ Of course! I'd be a fool not to order. Send 
me this month's LOAD 80 on cassette for only 
$11.47. That includes postage and handling. 

linnail plcav add 45< per item or 125.00 
per Mlbtcrfptioa I S. funds drawn on I S 
Kink- only. 
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Writing Model I/III input screens is as easy as 
answering a few simple prompts with Create. 



reate is a Basic 
program that 
provides a fast 
way to develop 
Model I/III in- 
put screens. It's simple; all you do is 
enter the number of headings and in- 
put fields you want, name them, and 
wait for the Basic "Ready" prompt to 
appear. Type in LIST and you'll see 
your newly generated routine that you 
can save as a Basic file and merge with 
any Basic program. 

In addition to generating the Basic 
code for the input screen, Create gives 
you the PR1NT@ locations for all of 
the input fields. Figure 1 is an example 
of a routine Create generates. It pro- 
duces the screen found in Fig. 2. 

Using Create 

Create asks you how many headings 
and how many input fields you want 
on the screen. It assumes that you 
want to include a screen heading and 
allows a maximum of five headings. If 
you indicate one heading, Create can 
provide up to 24 input fields. 

Create limits input fields to 26, al- 
though a more practical figure is 20 
fields per screen, allowing room for 
operator prompts. You're permitted 
up to 64 characters per field, with a 
field-name limit of 10 characters. 

Once you enter the last field name, 
Create generates the required program 
lines for the input screen and deletes it- 
self from memory. To merge your 
program lines, be sure to save them 
under the ASCII option. For example, 
you might save the program lines as 
follows: SAVE 4 'SCREEN 1/BAS", A. 

Important Notes 

Create starts numbering the gener- 
ated routine at line 150, and never ex- 



The ScreenWriter 



ceeds line 198. Therefore, when you 
write your main program, leave these 
lines open or renumber the routine. If 
you aren't merging your program, in- 
clude a Clear statement in the routine 
to avoid an "Out of String Space" 
error. 

The last line of the input screen rou- 
tine is always a remark statement indi- 
cating the input fields' PRINT® loca- 
tions. In Fig. 1, the first input field 
starts at PRINT® 459. Lines 156 and 
168 generate solid bars at the begin- 
ning and end of the input area, giving 
your input screens an attractive ap- 
pearance. 

Lines 159 and 165 of Fig. 1 produce 
the field names and input fields. I've 
allowed a 20-character space for the 
input field. Note that lines 159 and 162 
format the screen for two inputs per 
line. Create does this by dividing the 
number of input fields by 2. Because I 
requested five input fields in the exam- 
ple, Create divides 5 by 2 and comes 
up with a requirement of two lines 
with two input fields each. It then adds 
the remainder, 1 in this case, for a to- 
tal of three lines for input fields. 

Create now adds the number of 
headings requested (two here) plus two 
lines for the divider bars. Create calcu- 
lates that the finished screen would re- 
quire three lines for input, two lines 
for headings, and two lines for divid- 
ers, for a total of seven lines for the in- 
put screen. 

The 16 PRINT® locations on the 
left-hand side of the TRS-80 monitor 
run from zero to 960, increasing in in- 
crements of 64. Using this informa- 
tion, Create determines the number of 
lines on the finished screen and then 
selects a starting PRINT® location 
that will result in a centered input 
screen. 



by Doug Miller 

Bask Concepts 

After loading a Basic program into 
your computer, you can find the mem- 
ory address for the start of the pro- 
gram by PEEKing addresses 40A4 and 
40A5 hexadecimal (hex), or by using 
your DOS's Debug utility. 

In a similar fashion, addresses 40F9 
and 40FA hex contain the memory ad- 
dress of the simple variables the pro- 
gram uses. The variables table often 
starts directly after the last byte of the 
last line of your program. Therefore, 
you can assume that 40F9 and 40FA 
hex point to the end of the program, as 
well as to the beginning of the vari- 
ables. Knowing this, you can force Ba- 
sic to start the variables table wherever 
you want it to by adjusting the address 
found in these locations. 

A line of Basic code follows certain 
conventions. For example, the first 2 
bytes contain the memory address for 
the start of the next line of text, while 
the next 2 bytes contain the line num- 
ber. Thus, we now know that the first 
4 bytes stored in memory are always 
used for these same purposes. You al- 
so know that the last byte of each line 
in a Basic code is zero. You'll find the 
"action" code, which performs oper- 
ations such as print, multiply, If... 
Then functions, etc., between a line's 
first 4 bytes and its terminating zero. 

Table 1 illustrates this concept with 
a hypothetical program line. If you 
PEEK memory locations 40A4 and 
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Payment by VISA MC, Cashier's Check. Money Order 4 C O D 



Heart of TEXAS ^* 

COMPUTER SYSTEMS 



Toll Free 1-800 4 13- -5 184 
Texas 1-817-274 5625 



P Bo» 1327 Arlington. Tenas 76004 Prices rellect our special 3*. cash a 

TRS-80 OWNERS! 
TRY THESE DO IT YOURSELF 
INTERNAL DISK DRIVE 

EXPANSION KITS. 

Schools! Individuals! Do you have a TRS-80 Model III or 
Model IV computer that would serve your needs better with 
the addition of a disk drive? You could upgrade your 
computer quite easily yourself and dramatically increase its 
productivity and usefulness. 

TCS has four years experience selling disk drive 
expansion kits to satisfied customers. Our kits use first rate 
Tandon drives and other top quality materials. And. we 
provide complete detailed instructions on the simple 
installation. You really don't have to be an electronics 
technician. Don't wait 1 Prices are now at an all time low. 

KIT M-lll M-IV 

Kit 1 Controller. Power Supply. Hardware 

Instructions. (Add your own drives) . $189 $259 
Kit 2 Kit 1 plus one 40-track Tandon 

Disk Drive (160K) $299 $399 

Kit 3 Kit 1 plus two 40-track Tandon 

Disk Drives (320K) $459 $529 

Kit 3a Kit 3 with two 80-track drives 

(dual sided 40s) (640K) $539 $599 

Model IV needs 64K to operate. Kit available. 
Disk Controllers $95, Two or more, $90 each. 



No lax out o< state T eians add 5 



Prces subject to change 



TRS-80 COMPUTERS 




Model IV & 4-P 
$1049 

A LOW SPECIAL PRICEon the Model IV 
and 4 Portable. Retails for $1299. 
Includes two single sided double 
density 160K drives, green screen 
monitor and Radio Shack warranty. 
64K upgrade kit available for $99. 

TCS Model IV 

$T49& $1299 

Maximum Upgrade. Includes two 320K 
double sided double density drives. 
Black and white monitor and 180 day 
TCS warranty Fully assembled and 
ready to run. 




Gemini 10X Printers 

We've Cot the Deal! 

List $399 Was $"290. CALL 

This is the quality printer that has become the number one 
seller in the world with Commodore. 120 characters per 
second, 80-132 column, 96 ASCII characters, dot matrix with 
true descenders, emphasized type, double strike, bit image 
and block graphics, parallel interface standard equipment 
and standard eight line buffer expandable to 8K. A real 
winner to meet a broad range of your printing needs. 

Star Gemini 15X Printer 

List $549 Was $390. CALL 

Get all the terrific Gemini features plus a fifteen inch 
carriage to handle your report and spreadsheet needs. 

Our sales people are knowledgable of the Star Micronics line 
and will be glad to advise you on the printer to best meet your 
needs in function and in price. We will meet any nationally 
advertised price. 



$1595 

TCS Personal Computer 

Has IBM-PC Compatibility 

For Less Cost 

If you wanl to buy value 
rather than just name, 
then dare to compare. 

TCS Personal Computer features: 

• Two double sided doubledensity thin 
line disk drives as standard equipment. 

• 128K of RAM memory standard with 
optional onboard addition up to a 
capacity of 256K • Heavy duty 70 watt 
fan cooled power supply. • 2 RS-232 
Serial ports and one parallel printer 
port standard • Five IBM compatible 
expansion slots • Full compatibility 
with IBM-PC peripherals and software 

• Keyboard of 96 keys designed for 
touch typing ease, including enlarged 
ENTER key, LED lights on cap lock and 
a separate grouping of arrow keys for 
easier operation • Full year warranty 
on logic board. 

Compare a similarly equipped IBM-PC 

at $2995. 



*\CORVUS 

HARD DISKS 
25% Off List 

5 to 180 megabyte hard disks for IBM-PC, 
Apple. TRS-80, Eagle, Heath, Zenith DEC 
Rainbow, TI-PC, S-100, Atari 800, 
Commodore, Xerox, Superbrain, etc. 

New Omninet Drive includes Multiuser 
Disk Server at no additional cost, as well as 
single user software, 3 tap boxes, manuals and 
transporter card Prices from $1575 for5 5 mg. 
Compatible with IBM. Compaq, and others. 
We will beat any nationally advertised price. 



$.99 Generic Disks 

Buy Bulk and Save 

100% Error free Mini Floppy Diskettes, 
complete with hub rings, labels and 
tyvek envelopes. Certified SSDD but 
our tests show 80% can be used for 
SSDD and 65% forDSDD. 5.25 inch soft 
sector floppys. Our special purchase 
means savings for you. 

150 Disks (1 Box) ea. $1.39 

600 Disks (4 Boxes) ea. $1.19 

4800 Disks (8 Cases) ea. $.99 



40A5 hex, you'll find the address 
6D00 (see the heading Memory Loca- 
tion in Table 1). The next heading, 
Basic Code, lists examples of Basic 
codes you might find. As mentioned 
above, the first 2 bytes (address 0A6D) 
point to the beginning of the next Ba- 
sic program line at address 6D0A, 
which immediately follows the zero 
byte at memory location 6D09, sig- 
naling the end of the first line of 
Basic code. 

Memory locations 6D02 and 6D03 
contain 0A00, the first line number of 
our sample program which translates 
to line 10 in decimal. Then comes the 
action code, indicated by XX. Basic 
converts action words into 1-byte 
codes called tokens. Table 2 lists Cre- 
ate 's action words. 

Line 25 of the Program Listing il- 
lustrates the use of tokens. The data 
statement in line 25 lists the following 
numbers: 

196,40,54,48,44.247,40,49,5 1 .49.41 .41 

This translates into STR1NG$(60, 
CHR$(131)), the code that generates 
the divider bar on the video screen. 

If you refer to the token codes in 
Table 2 and an ASCII code table, you 
can make the complete translation 
yourself. By adding the correct 4 bytes 
(the pointer and the line number) to 
the beginning of this code and a zero 
byte at the end, you'll have a line of 
Basic code. That's how Create 
works — it takes your inputs, adds the 
right pointers, line numbers, and 
tokens, and generates the lines of a 
Basic code. 

Housekeeping Functions 

Lines 1-28 are housekeeping lines 
that set up key variables and define 
functions. The GOSUB 1 12 moves the 
start of the variables list table to higher 
memory, giving Create the room nec- 
essary to add the lines of Basic code it 
generates to the end of itself. The GO- 
SUB 124 calculates this end location. 

Line 14 initializes a machine-lan- 
guage subroutine. The routine, called 
in line 103, moves blocks of code 
around. You could use a series of 
PEEKs and POKEs, but that would 
be much slower. 

Line 16 defines a function that han- 
dles PEEK and POKE address calcu- 
lations above 32767. Line 19 defines a 



function that centers a string used to 
center the headings. Line 28 stores, in 
an array, all the possible PRINT@ ad- 



dresses Create uses, and POKEs the 
divider line code (STRING$(64,CHRS 
(131))) into memory. 



150 


PRINTS256," CITY GENERAL HOSPITAL" 


153 


PRINT8320," PATIENT RECORD" 


156 


PRINT03 84 , STRINGS (60,CHR$( 131) ) 


159 


PRINT8448,"NAME : AGE :" 


162 


PRINT@512,"SEX : STREET :" 


165 


PRINT ? c -76 , "CITY :" 


168 


PRINT§6 40,STRINC$(60,CHR$(131)) 


171 


REMEMBER YOUR PRINTS POSITIONS ARE: — 459 492 523 556 587 




Figure I. Sample of Create 'Bus generated code. 



CITY GENERAL HOSPITAL 
PATIENT RECORD 



NAME i 


AGE 


: 


SEX : 


STREET 


: 


CITY : 







Figure 2. Sample video screen. 



Memory 


Bask 




Location 


Code 


Comments 


6D00 


0A 


First 2 bytes point 


6D01 


6D 


to start of next line 


6D02 


0A 


2-byte line number 


6D03 


00 




6D04-6D08 


XX 


Action codes 


6D09 


00 


End of first line 


6D0A 


16 


Next 2-byte pointer 


6D0B 


6D 


Etc... 


6D0C 


14 




6D0D 


00 




Table 1. . 


Memory locations and codes. 



Token 




Decimal Hex 


Basic Ke> Word 


178 B2 


PRINT 


147 93 


REM 


1% C4 


STRINGS 


247 F7 


CHRS 


Table 2. Tokens used by Create. 



Element 1 


@256," CITY GENERAL HOSPITAL" 


Element 2 


@320," PATIENT RECORD" 


Element 3 


@384,STR1NGS(64.CHR$(131)) 


Element 4 


@448,"NAME : AGE :" 


Element 5 


Etc... 




Table 3. A2S array. 



Program Listing. Input screen generator. 

i*********************************** 

CREATE. .. .INPUT SCREEN GENERATOR 

DOUG MILLER 
*********************************** 

/ MMg continued on p. 104 
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NRI gives you ALL the 

trainingyoull need to repair 

ALL mbrocomputers. 



\ 



When you've learned 
the basics the NRI way, 
you can troubleshoot 
the entire system — 
and earn good 
money doing it! 

For business owners, 
lost computer time means lost 
money. For customers, 
it usually means frus- 
tration, delay and a 
strong temptation to 
take a walk to the 
nearest competitor. 

But for the NRI- 
trained computer ser- 
vice technician, a down 
computer can mean higher 
earnings or even the 
opportunity to start a profit- \ 
able business. 

Fixing computers: fastest growing 
occupation in the U.S. 

Whether the flaw is in a circuit 
board, a disk drive or a printer, 
everybody wants it fixed— fast. 

The U.S. Department of Labor 
recently projected that the number of 
computer service jobs wil double 
before 1995. Median earnings of full- 
time computer service technicians 
are $430 per week. 

The trained computer techni- 
cian can choose between: working 
for a large corporation or an inde- 
pendent; making office calls or stay- 
ing in the shop; working for a retailer 
or for a specialized service firm- 
even starting his own computer 
repair business. 

Total System Training from NRI. 

As an NRI graduate, you'll be 
qualified to fix just about everything 
that can go wrong, for any major 
brand of desktop microcomputer. 
Only a person who knows and fully 
understands all the underlying 
fundamentals of microcomputers 
can hope to be able to tackle all 
microcomputers. NRI has known the 
need for thoroughly understanding 
fundamentals since 1914. 

NRI's training is hands-on train- 
ing. You get practical experience in 
writing programs in BASIC, testing 
and debugging systems. You'll learn 
how to install an expansion board. 

' See List ot Advertisers on Page 176 
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i Registered Trademark 
o* International Business Machm 
Corporation. 

Epson is a Registered Trademark ol 
Epson America, Inc. 

Apple and the Apple logo are Registered Traden 
of Apple Computer. Inc. 
Compaq is a Registered Trademark ol COMPAQ Computer 
Corporation. 

19»4 AT IT Technologies, Inc. 

how to troubleshoot pesky circuit 
flaws. Using NRI's exclusive 
Discovery Lab", you'll perform over 
60 experiments. You'll learn how to 
fix the disk drives and printers. 

You learn at your convenience, 
at your own most comfortable pace. 
Without classroom pressures, with- 
out rigid night-school schedules, 
without wasted gasoline. Your per- 
sonal NRI instructor and the NRI staff 
will answer your questions, give you 
guidance— even give special help if 
you need it. 



Computer, disk drive and printer 
— all yours to keep 

As part of your training, you work 
with a TRS-80 Model 4. a power- 
ful microcomputer with many of 
the features and capabilities of 
machines costing three times 
as much. 

You'll install a double- 
density disk drive and a dot- 
matrix printer. And the entire 

system— computer, drive, 
printer and manuals 
—is yours to keep, as 
part of your training. 

100-page FREE 
Catalog Tells More 

Send the coupon 
today for NRI's big 100- 
page free color catalog, which 
gives you all the facts about NRI 
training in Microcomputers, 
Robotics, Data Communications, 
TV/Video/ Audio Servicing and other 
high-tech career fields. (If the coupon 
is missing, write to NRI, 3939 
Wisconsin Ave., Washington. DC 
20016.) _———■ 



Your NRI course In- 
cludes this modern 
S4K RAM microcom 
puter. dual densit, 
dlsM drive, 
dot matrix 
printer 
plus a 
proles- „ 
sional LCD 
multimeter 
NRI Ola 
cotery Lab 
and hundreds ol 
demonstrations and 
experiments. It's alt 
yours to keep. 




n 



SCHOOLS 

McGraw-Hill Continuing Education Center 
3939 Wisconsin Avenue, Washington, DC 20016 

We'll give you tomorrow. 

CHECK ONE FREE CATALOG ONLY 

3 Computer Electrones with Microcomputers 

[ ] Data Communications 

□ Roootes & Industrial Controls 

G Color TV Audio, and Video System Servicing 

D Electronic Design Technology 

I I Digital Electronics 






All Career courses 
approved under Gl bill 

G Check tor details 
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□ Communications Electronics 
Industrial Electrones 

C Base Electronics 
D Telephone Servicing 

□ Small Engine Servicing 

□ Appliance Servicing 



□ Automotive Servicing 

□ Air Conditioning. Heating 
Refrigeration. & Solar Technology 

D Building Construction 

□ Locksmithmg & Electronic 
Security 



>,, ne pi-, - •■ ,: 
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ly'Slate/Zip 



Accredited Dy me National Home Study Council 
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TRS-80 is a trademark ot the Radio Shack division ot Tandy Corp. 
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Headings and Fields 

Lines 31-43 accept data for the 
number of headings and input fields 
you specify. Line 40 calculates the to- 
tal number of lines (TL) your screen 
needs. It also sets up counters (LC and 
EN) to keep track of the current screen 
line. Line 40 is also responsible for 
A2$(EN), which contains part of the 
"Remember" line. Line 43 creates the 
Al$ array that contains the required 
PRINT® locations. 

Lines 46-85 accept the headings and 
field names, building them into 
strings. Eventually, these strings will 
become part of the program lines Cre- 
ate generates. For example, look at 
lines 49-55; the program asks for a 
heading and then centers it. Line 55 
builds a string consisting of the correct 
PRINT® position (A1$(LC)), an 
open-quote mark (CHR$(34)), the 
heading (HC$), and a close quote 
(CHR$(34)). 

Create goes through a similar pro- 
cess for the field names. The GOSUBs 
in lines 58 and 85 set up the divider bar 
code and transfer it to a string. Create, 



by this time, has created the A2$ array 
shown in Table 3. 

Completing the Process 

Lines 88-103 complete the program 
lines, moving them into place at the 
end of Create. In line 88 you set the 
current address, CA = EP%, which 
points to the end of Create. 

Line 94 calculates the address for 
the start of the next program line. The 
next address (NA) is the current ad- 
dress (CA) plus six plus the length of 
the string that makes up the program 
line. The six allows for the mandatory 
first 4 bytes, as well as 1 byte each for 
the print token and the zero at the end 
of a line. 

Line 97 breaks NA into its most sig- 
nificant byte (MS%) and its least sig- 
nificant byte (LS^o). Create then 
POKEs LS<7o and MS<7o into CA and 
CA+ 1. Then it POKEs CA + 2 and 
CA + 3 with the line number (LN). 
Create then POKEs CA + 4 with the 
token for print (178) or, if it's the last 
line used, with REM (147). 

Line 103, the block move routine, 
transfers the contents of an element 



from the string array into position, 
starting at CA + 5. In the example in 
Fig. 1, this is done first by moving 
@256, CITY GENERAL HOSPI- 
TAL, into place. Create then puts a 
zero byte at the end of the line. This 
process is repeated until all lines are in 
place. After the last line, Create inserts 
two additional zeros, indicating the 
end of the program. Finally, Create 
deletes itself, leaving only the program 
lines generated. 

Line 109 is a string pointer routine 
that lets you move strings into any 
memory- location. Line 112, a variant 
of the string pointer routine, resets Ba- 
sic's pointer to the start of the vari- 
ables storage area. Line 124, the last 
line of the program, calculates the 
memory location of the end of the 
program. ■ 



Contact Doug Miller at 214 Centen- 
nial Road, West Hill, Ontario, MIC 
1Z9. 

Routines m lines 14, 16. 109. 112. and 124 art published by 
permission of ihe author of Basic Faster & Better St. Other 
Mysteries, Copyright - 1982. Lewis Rosen/elder. 



CONVERT YOUR TRS-80 MODEL I, III, OR 4 INTO A 

DEVELOPMENT 
SYSTEM 




Now you can develop Z-80 based 
stand-alone devices such as games 
robots instruments and peripheral 
controllers, by using your TRS-80 as a 
development system The DEVELOP- 
MATE plugs into the expansion con- 
nector of your TRS-80 and adds 
PROM PROGRAMMING and IN- 
CIRCUIT-EMULATION capabilities to 
your system (with or without expan- 
sion interface) 



Complete instructions and sample 
schematics are included to help you 
design your own simple stand-alone 
microcomputer systems THESE 
SYSTEMS CAN BE AS SIMPLE AS 
FOUR ICs one TTL circuit for clock 
and reset a Z-80, an EPROM, and one 
peripheral interface chip 

When the In-Circuit-Emuiation 
cable is plugged into the Z-80 socket 
of your stand-alone system, the sys- 
tem becomes a part of your TRS-80 
You can use the full power of your 
editor/assemblers debug and trace 
program to check out both the hard- 
ware and the software Simple test 
loops can be used to check out the 
hardware, then the system program 
can be run to debug the logic of your 
stand-alone device 

Since the program is kept in TRS-80 
RAM changes can be made quickly 
and easily When your stand-alone 
device works as desired, you use the 
Developmate's PROM PROGRAMMER 
to copy the program into a PROM 
With this PROM, and a Z-80 in place of 
the emulation cable your stand-alone 
device will work by itself 



The DEVELOPMATE is extremely 
compact Both the PROM programmer 
and the In-Circuit-Emulator are in one 
small plastic box only 3 2" x 5 4" A 
line-plug mounted power supply is 
included The PROM programmer has 
a personality module' which defines 
the voltages and connections of the 
PROM so that future devices can be 
accommodated However, the system 
comes with a universal' personality 
module which handles 2758, 2508 (8K) 
2716, 2516 (16K) 2532 (32K). as well 
as the new electrically alterable 2816 
and 48016 (16K EEPROMs) 

The COMPLETE DEVELOPMATE 
81. for Model I. with software, power 
supply, emulation cable. TRS-80 
cable and universal ' personality 
module $329 

DEVELOPMATE 83, Model III/4 version. 

same as above $329 

PM2 PERSONALITY MODULE for 

2732A EPROM $15 

PM3 PERSONALITY MODULE for 
2764 EPROM $15 

Instruments -'*< 

172 Otis Avenue. Dept M Woodside. 

CA 94062 

(415) 851-1172 

Master Charge and Visa phone orders accepted 

California residents please add 6 «* sales lax 
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ISnPUTRD L 

PRINTER BUFFERS 



(ggl| as low as Q 110 95 



$A VE LOST COMPUTER TIME! 



BUFF-IT 
PRINTER BUFFER 

> 8K- $119.95 

> 16K- $125.95 

> 64K- $173.95 



FEATURES INCLUDE: 

• Pause/Copy Switch 

• Buffer Reset Switch 

• Power Indicator 

• Transfer Indicators 

• Internal Power Supply 

• Works With Any Centronics 
Parallel Computer 4 Printer 

• Startup Diagnostics 

• 90-Day Warranty 

• Ready To Go ■ "Just Plug 
It In And Buff If 



WE BEAT ANY BUFFER PRICE 
CALL FOR QUANTITY PRICING 
OEM AND DISTRIBUTOR DISCOUNTS 
AVAILABLE 



COMPUTROL ENGINEERING 

P.O. Box 9068 
Livonia, Ml 48150 
(313)699-6464 „ 94 



T»rms: Add 3% MajIscCard and Visa or 
Money Order UPS. COD. Add $4 00 
Shipping & Handling. Michigan resi- 
dents add 4% solas tax. 



MICRO GRIP IV 





Designed specifically for the Epson MX-70/80, RX-80, 
and printers that are based on the Epson design. 

The all new and ultra-improved Micro-Grip"*, exclusively manufactured 
by Bill Cole Enterprises, is the answer to your printer's friction feed needs. 
Now you can adapt or retrofit your printer to use non pin-feed paper for the 
fraction of the cost of buying a letter-quality printer. Easily installed with just 
a screwdriver, the Micro-Grip^* IV can upgrade your current printer to 
deliver both the friction feed and tractor capabilities you're looking for. 
Micro-Grip** IV has been designed for the Epson MX 70/80, RX-80, and 
printers based on the Epson design such as the IBM PC, Commodore, and 
HP. All this for the remarkable price of just $39.95 plus shipping. Order 
today and see why the Micro-Grip*** IV is the best ever! 

TERMS 4 CONOmONS 



i of '0 00 <s reouired not including shipping Pnces eftective 5 i 84 and are suDteci to change wrhoui 
notice Automat* credrt is extended to federal agencies but to keep our prices competitrve «e must request 
payment with order from all other individuals and institutions No C O O orders accepted eicept to* treignt charge 

No merchandise may be returned without prior written authorization from this Omce Merchandise Ordered in error or 

not wanted is subject to a 25% restocfcing charge Oetecttve material replaced at no charge am returns limited to a 
merchandise credit only Mass residents add 5% sales ta* 



map- 



•180 



P.O. BOX 60 • DEPT. R10 • WOLLASTON, MA 02170-0060 
(617) 773-COLE (617) 963-5510 
For Credit Card Orders ONLY! Call Toll Free 1-800-225-8249 



DISPLAYS CORRECT SPELLINGS: 

If you don't know the correct spelling, 
E W will look it up for you, and display 
the dictionary. 

VERIFIES CORRECTIONS: If you 

think you know the correct spelling of 
a word, EW will check it for you before 
making the corrections. 

HYPHENATES AUTOMATICALLY: 

(Optional). Inserts discretionary hy- 
phens throughout text. 

GRAMMAR & STYLE CHECKER: 

(Optional). Identifies 22 types of com 
mon errors. Makes suggested cor- 
rections with the stroke of a key. 
Runs within EW. 

50,000 WORD DICTIONARY: Uses 
only 2V> bytes per word; add as many 
words as you wish. 

FAST CORRECTING: In as little as 
30 seconds, Electric Webster can return 
you to your Word Processing program, 
with your text fully corrected and on 
your screen. 

INTEGRATES: into 12 different word 
processing programs: WordStar, Spell- 
binder, Palantir, NewScript, Lazy 
Writer, SuperScripsit, Scripsit, Elec- 
tric Pencil, CopyArt, Superscript, Zor- 
lof, and LeScript (specify). Begins 
proofing at the stroke of a key; returns 
you to word processing automatically. 




Sectric 
w ebster 




"The Cadillac" 

of spelling checkers 
80 Microcomputing, 9/82 

VOTED #1: For the second straight year, 
Electric Webster was voted the #1 spell- 
ing checker in the 80 Micro Reader's 
Choice Awards. ( 1/83, 1/84) 

"The most helpful program I've found is 
Electric Webster. After looking at nine 
proofreading programs, I've settled on 
Webster . . "Creative Computing, 11/83 



This dictionary is not published by the original publishers of 
Webster's Dictionary or their successors. 



ACCLAIMED: 

"Electric Webster is the best. Just read 
any review in any magazine and I don't 
believe that you will find even one dis- 
agreement to that statement." CINTUG, 
Cincinnati's Users Group Mag., 4/83 

"Now there's a program called Electric 
Webster that would let me write to 
Presidents and Kings and never feel em- 
barrassed. Miss Mulberry would give 
Electric Webster an A + , and so will you." 
Computer User, 1/84 

Performance "Excellent"; Documentation 
"Good"; Ease of Use "Excellent"; Error 
Handling "Excellent". Info World, 8/82 

LOW PRICES: 

TRS-80 Electric Webster $ 89.95 

w/Correcting Feature $149.95 

Hyphenation $ 49.95 

Grammar & Style Checker $ 49.95 

CP/M, PC/DOS or MODEL 2000 
Electric Webster $209.95 

(with Correcting Feature) 
Hyphenation Option Included* 

Grammar & Style Option Included* 

*Limited Time Only 



CORNUCOPIA 
SOFTWARE 



(415) 524-8098 
Post Office Box 61 1 1 Albany, California 94706 




*- See List ol Advertisers on Page 176 
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LOOKING 
FOR THE 

BEST 
PRICES? 

FINANCING AVAILABLE 




Unbeatable Prices! 

• We will meet or beat any price from an 
authorized dealer in 

the NY metropolitan area. 

• Largest TRS-80 Dealer on the 
East Coast 

• Next day delivery to NY, NJ & Conn. 

• No Sales Tax collected on out of state 
shipments (NJ res. add 6%) 

• Selling TRS-80 Computers since 1978 

• Major Credit Cards Accepted 

tiSt&t, il 



TANDY 2000 MODEL 4 



SYSTEM INCLUDES: 

•Tandy 2000 256K 

• Green Monitor 

• Epson FX-80 

160 C PS Printer 

• Printer Cable 

• Steel Printer Stand 

• Boxof (10) 96-TPI 
Diskettes 

• Case of Paper 

• Head Cleaning Kit 

• Lotus 1-2-3 

List Price % 4,377 
C DA Price s 3,549 



WORD PROCESSING 
SYSTEM 

INCLUDES: 

• Model 4 1 28K 

• Epson RX-80 

100 C PS. Printer 

• Printer CaDle 

• Boxof (10) Diskettes 

• Case of Paper 

• Superscripsit 

Word Processing Printer 
Driver Program 

List Price *2,l 89 
C DA Price s 1, 649 



All RADIO SHACK SOFTWARE 20% OFF LIST PRICE 



EPSON PRINTER PACKAGE 



Includes: •Epson FX-80/ 160 C. PS. 
with graphics 

• Printer Stand 
t1 - • Case of Paper 

~\ • Extra Printer 
Ribbon 

• Interlace Cable 

FOR RADIO SHACK TRS-80 '698 '499 
FOR RADIO SHACK COLOR '789 *579 



Buy Direct By Mail or Phone 
ORDERS ONLY: 800 526 5313 

Inquiries/Customer Service 
and in M.J. 201 -728 8080 " ,,a 

MAJOR CREDIT CARDS ACCEPTED! 




CDfl 
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Ad 
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Listing continued from p 100 



2 'REMEMBER SET MEMORY AT 62000 

10 CLS:POKE&H40B1,30:POKE«.H40B2,242:CLEAR5000:GOSUB112:GOSUB124 

13 DIMAIS(IB) ,A2$(18) ,PO$(18) : TC%=17 8: DEFINTU,X: J%=0 :SG$=STRING$ 
(64,131) 

14 US(0)=8448:US(2)=4352:US(4)=256:US(6)=-20243:US(7) =201 

16 DEFFNSI%(All)=-( (Al!>32767) *(A1 1-65536) )-( (Al K3276 8) *Al 1 ) 

19 DEFFNCN$(A$,A%)>=STRING$(A%/2-LEN(A$)/2-.5," ")+A$ 

22 DATA" §000, ", B @064,", n £128, ","31 92,-, "§256,"," 3320,"," §3 84,", " 

§44 8, ","§51 2, ","§576, ","§6 40, ","§704, ","§76 8, ","§832, ","§896,"," 

§960," 

25 DATA1 96, 40, 54, 4 8, 44, 247, 40, 4 9, 51, 4 9, 41, 41 

28 FORX=l T016:READA$:PO$(X) =A$:NEXT:FORX=l T012 :READA:POKEFNSI% 

(65520+X) ,A:NEXT 

31 PRINT§384,SG$; :PRINT§704 ,SG$; 

34 PRINT§512, "INPUT NUMBER OF HEADINGS " ; : INPUTH : IFH>5THEN34 

37 PRINT§576, "INPUT NUMBER OF FIELDS " ; : INPUTF : IFF>24THENPRINT§5 
76, STRINGS (50, 32) :GOT037 

38 IF F=0 AND H=0 THENPRINT§448, STRINGS ( 2 ,13) :GOT034 

40 Fl=INT(F/2) :F2=F-(F1*2) : F3=Fl+F2 :TL=F3+2+H :TM=INT( (16-TL)/2) : 
LC=TM+1:EN=LC+TL:A2$(EN)="EMBER YOUR PRINT§ POSITIONS ARE:-- " 

41 IFTL>15THENPRINT§832, "NUMBER OF HEADINGS PLUS INPUT FIELDS... 
EXCEED LIMITS REDO PLEASE" : FORX = l TO 2500 :NEXT:CLS :GOT031 

43 FORX=l TO TL:A1$(LC) =PO$(LC) :LOLC+l:NEXT 

46 LC=TM+1:K=LC:IFH=0THEN58 

47 PRINT§384,SG$:PRINT§704,SG$ 
49 FORX-K TO K+H-l 

52 PRINT§448, STRING$(2, 13) :PRINT§512, "INPUT HEADINGS ";:INPUTH$ 

53 IFLEN(H$) >64THENPRINT§896, "HEADING EXCEEDS 64 CHARACTERS" : FOR 
M=l TO 1500:NEXT:PRINT§896,CHR$(31) :GOT052 

54 HC$=FNCN$(H$,64) 

55 A2$(LC)=A1S(LC) +CHR$(34) +HCS+CHRS ( 34) : LC=LC+1 :NEXT 
58 GOSUB106:LC=LC+1:K=LC 

61 FORX=K TO K+Fl-1 

62 PO%=11:IFF3=0THEN88 

63 IF F=l THEN 79 
6 4 FORY=l TO 2 

67 PRINT§448,STRING$(2,13) :PRINT§512," INPUT FIELD NAMES ";:INPU 
TF$(Y) 

68 IF LEN(F$(Y) ) >10THENPRINT§832, "FIELD NAME EXCEEDS 10 CHARACTE 

RS PLEASE RE-ENTER" :FORM=l TO1500 :NEXT: PRINT§832 ,CHR$( 31) :GO 

T067 

70 A2$(LC)=A1S(LC)+CHR$(34)+FS(1)+STRING$(10-LEN(F$(1)) ," ")+":" 
+STRING$(22," ") +FS(Y) +STRINGS ( 10-LEN ( F$ ( Y) ) ," ")+":" +CHRS ( 34) 

71 PA%=( (LC-1) *64) +PO% 

72 A2$(EN) =A2S(EN) +STR$(PA%) :PO%=44 

73 NEXTY:LC=LC+1:NEXTX 
76 IF F2=0 THEN 85 

79 PRINT§448,STRING$(2,13) :PRINT§512," INPUT FIELD NAME ";:INPUT 
FS(1) 

80 IF LEN(F$(1) ) >10THENPRINT§832, "FIELD NAME EXCEEDS 10 CHARACTE 

RS PLEASE RE-ENTER" :FORM=l TO1500 :NEXT: PRINT§832 ,CHR$ ( 31 ) :G 

OT07 9 

82 A2$(LC)=A1S(LC)+CHR$(34) +FS(1) +STRINGS ( 10-LEN ( F.S ( 1) ) ," ")+":" 
+CHR$(34) :LC=LC+1 

83 PA%=( (LC-2) *64) +11 

84 A2S(EN) =A2$(EN) +STR$(PA%) 

85 GOSUB 106 

86 PRINT§512," YOUR INPUT SCREEN NOW BEING WRITTEN" 
88 LC=TM+1:CA=EP%:LN=150 

91 FORX=LC TO EN 

94 NA=CA+6+LEN(A2$(X) ) 

97 MS%=INT(NA/256) : LS%=NA- (MS% *256) 

99 IFX=EN THENTC%=147 

100 POKEFNSI%(CA) ,LS%:POKEFNSI%(CA+l) ,MS% : POKEFNSI% (CA+2) ,LN:POK 
EFNSI%(CA+3) ,0:POKEFNSI%(CA+4) ,TC% : LN=LN+3 : CA=CA+5 

103 DA=PEEK(VARPTR(A2$(X) ) +1) +( PEEK ( VARPTR( A2$ (X) ) +2) *256) :US(1) 

=FNSI%(DA) :US(3)=FNSI%(CA) : US ( 5) =LEN ( A2§ ( X) ) :DEFUSR=VARPTR (US ( 0) 

) :J%=USR(0) :POKEFNSI%(NA-l) ,0 :CA=NA: NEXT: POKEFNSI% (NA) ,0:POKEFNS 

I%(NA+1) ,0:DELETE1-124 

106 A1%=12:A%=FNSI%(65521) :GOSUB109: A$=AN$: A2$ (LC) =Al$ ( LC) +A$:RE 

TURN 

109 AN$=" ":POKEVARPTR(AN$) ,Al% : POKEVARPTR (AN$) +1 , ASC (MKI$( A%) ) : 

POKEVARPTR (ANS) +2 , ASC (RIGHTS (MKI$ (A%) ,1) ) :RETURN 

112 A$ = "":FORA% = 1TO3:A$=A$+MKI$(S.HA500) : NEXT : AN$ = "XXXXXX" : POK EVA 

RPTR(AN$) +1,S,HF 9: POKEVARPTR (AN$) +2 , &H40 : LSETAN$=A$: A$ = " ": RETURN 

124 A$="":EP%=VARPTR(A$) : EP%=CVI (CHRS (PEEK ( EP% +1) ) +CHRS ( PEEK ( EP% 

+2) ) ) +4 8: RETURN 
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"•MODEL a OWNERS*** 

Tired of Waiting on Your Machine 
IT CAN RUN FASTER! 

INTRODUCING 
THESUPER4 

A Speed-up ForThe TRS-80 Model 4 



NO TRACE CUTTING NO SOLDERING 
NO WIRES TO CONNECT 

works in Model 3 or Model 4 Modes 
increases Processor Speed 1 .6 to 2.5 Times 

Allows Double Density on 8 Inch Drives 
Works With TRSDOS. DOSPLUS. LDOS. or CP/M 
A Lot of increased Computer Power for Only 

$79.95 WITH 6 MHz Z80B 

Call or write Today 

Alpha Technology, inc. 

Digital Products Division 

280 Roosevelt Ave. 

Satellite Beach, Ft 32937-3029 

(305)773-1136 

Dealer inquiries invited 

MasterCard, visa, and COD's accepted 

Other hardware & software products available 

we also provide custom software & 
hardware systems at very competitive 
prices. ^ 



TRS80 FREEDOM AT LAST! 

Hyp«rcro»« CPM-TRS80-PC Pit Tran«f»r 

Now you can cross trie barrier between disk 
(ormatsl With Hypercross you can kW and copy 
files to/from over 65 different CP/M and 5 IBM PC 
disk formats on your own TRS80 under your own 
DOS! You can also formal and DIR these disks! 
CP/M includes most well known single and dou- 
ble sided formats including Montezuma 2.2 and 
Radio Shack 3.0+ PC includes DOS 1.1 and 2.0 ss 
and ds and Tandy 2000 Automatically corrects for 
differences in ASCII file formats You can choose 
image transfer for binary files Versions available 
for Model I. Ill and IV. needs 48k and 2 drives 
minimum Some formats require double sided and 
or 80 track drives Model I needs doubler Specify 
Model and version required -CPM or PC alone 
Mt.", combined deluxe CPM and PC •79.* t ppd 

New Hyp«rzap 3.1 Disk Magic! 

Hyperzap is more than just another disk copying 
program, ft is the program for analyzing, copying, 
repairing, creating floppy disks of all kinds, ft will 
copy any TRS80 format as well as disks from many 
others such as CP/ M IBM- PC. CoCo etc Specially 
designed to handle mixed density sectors on any 
track in any sequence. Many features for reading, 
writing, editing track and sector data Hyperzap is 
the tool that lets you be In charge 
Make your own self booting disks. Take you own 
CMD file and turn it into a dual booting Mod 
1/lll/IVdisk. 

New feature Autopilot mode allows learning, sav- 
ing and repeating established techniques Disk 
comes with fascinating examples 
Hardware needed: 48k 1 drive minimum. Mod 1 
needs doubler 36 page manual - •49. H ppd. 

HYPERSOFT ^ 

PO Box 511 55, Raleigh, NC 27609 
(919) 847-4779 6-11 pm EST 



Tour doubl»-d»mity diekettee spin at 300 Rf*M 

and hold 4608 bytea par track. 

That's equivalent to 23,040 bytas par second. 

So why doas backing up taka ao long? 

Tha problam la alow software. 
Tha solution la ... 

I*S 80 Model I/III/4 



RAPIDOS la a new dlak operating ayatam that 

can raad or ujrita an antlra dlak track 

In a slngla revolution of tha drive. 

With RAPIDOS. tha Rapid Olak Duplication Progra 

can copy and verify a full 40-track 

double-deneity dlakatte and perform a ... 



Z6-SEC0ND 
BACKUP 



format, copy, and verify In lust 42 seconds. 

Great for backing up a atack of dlekattea. 

After you finish one backup. 

start tha mil with one kay depression. 

The Rapid Dlak Duplication Program comas with 
a manual containing operating Inatructlona, 

eiplenetlona of error massages, 
and a description of the operating system. 

Program la available In three TKS-BO varalona: 

Model I version backs up TRSDOS 2.3 dlaka. 

Modal HI version backs up TRSDOS 1.3 dlaka. 

Modal V4P veralon becks up TRSDOS 6.X dlaka. 

Program dlakatte end manual for one veralon: 

$30. OO. 

Order additional varalona for • 16.00 each. 
Sand check or money order to: 




'SOFTWARE, INC. 



I43S8 Dyer Street. Sylmar. California. 91342 



ms ao mo raSDOS era ragwtaraa irsaarran.* o« 'anay Corp. 

1^253 



World's Finest Computer Books 

By David A. Lien 



LEARNING TRS-80 MODEL 4/4P BASIC 

A complete tutorial course in BASIC. Learn 
programming from the authority on the 
BASIC computer language, David A. Lien. 
You"ll have your hands on the keys from the 
very beginning and find your confidence and 
skills growing with each chapter. $1 9.95 





a 
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THE TRS-80 MODEL 100 
PORTABLE COMPUTER 

Everything you need to know 
to master the Model 100. 
Instructions lor all of the built 
in software as well as Lien's 
comprehensive course in 
BASIC programming tailored 
for the Model 100. Whatever 
your use of the computer may 
be, this book provides the 
guidance you need $19.95 



COMPUSOFT 

•PUBLISHING* 

The Symbol of Excellence 

TRS-80 is a registered trademark of Radio Shack, a Division ot Tandy Corporation. 



LEARNING TRS-80 
MODEL III BASIC 
(includes the Model I) 

Puzzled over efficient 
programming methods for 
your Model III? Learn by 
experience with our proven 
BASIC tutorial written 
specifically for your 
computer. Develop the skil's 
to write your own custom 
software and enjoy 
iti $19.95 




p3 g eS 
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THE BASIC HANDBOOK, 
2nd Edition 

The most complete BASIC 
reference ever 1 500 BASIC 
words alphabetically listed 
with test programs, sample 
runs, and vanations in usage. 
Perfect reference for all 
programmers and especially 
valuable to those translating 
programs written for one 
computer to run on 
another. $19.95 



To Odor Call TOLL FREE 800 854-6505 nn Calif 619 588 0996) 
Or send your order to CompuSoft Publishing. 535 Broadway, 
Dept 200984, El Cajon. CA 92021 
Please add $2.00 lor PSH ($3.00 lor foreign orders) 1o the cost of the 
bcoK(s) Include your name address, tme and number o* book(s) 
ordered, check, MasterCard or Visa number with expiration date Books 
win be shipped via parcel post cook rate unless otherwise requested 
and paid tor m advance 

30 DAY MONEY BACK GUARANTEE 



s See List of Advertisers on Page 176 
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Wj/M ^fl QUALITY PROGRAMS 

■HHI J^^ H«H MEET COMPETITIVE PRICES 
2701 -C W 1 5th • SUITE 324 • PLANO. TX 75075 • (2 1 4) 680-8268 



kCount 
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FREE SOFTWARE 

Ordei over S 100 or more 

and select one ol the following, 

MasierDireclory Green Window I. II. III. or IV 

Molting Graphs tw Video Display, Ptotl«ig Grapns 

hx Line Printers, or one of the Mostly Basic Senes. 

Order over J?00 and select one ol In* 

tollowino. AOS Utilities SuperKeyS 

Keyboard Ut.iily. Voyage at the Valkyrie rr 



All MOD III programs specified in this ad will run on the Model 4 (in the MOD III mode). 



APPLICATIONS 

MASTERDIRECTORY MOO III 29.95 

SUPERDIRECTORY MOD l/lll 44.95 

A6RICALC FEEDER PIG 49.95 

EE LADDER NETWORK l/lll 39.95 

EE WOOER NETWORK TAPE 29.95 

THE BASIC CHECKBOOK l/lll 64.95 

MTERM l/IH/4 64.99 

LOAN AMORTIZATION III 29.95 

POWER MAIL PLUS I/III/4 124.95 

TEXT-MERGE FOR POWERMAIL + 49.95 

DESCRIPTIVE STATISTICS CASS 20.99 

ELECTRONICS I l/lll CASS 20.99 

ELECTRONICS II l/lll CASS 20 99 

ELECTRONICS III l/lll CASS 20.99 

ACTIVE FILTER DESIGN l/lll CASS 20.99 

MOSTLY BASIC SCIENTIFIC CASS 14.99 

MOSTLY BASIC EOUCATIONAL CASS . . . . 14.99 

MOSTLY BASIC HOUSEHOLD CASS 14.99 

THE TEST GENERATOR MOD III 34.95 



GRAPHICS 

POWERORAW l/lll 34.95 

DATAGRAPH l/lll/SPECIFY PRINTER .... 74.99 
OATAGRAPH PIE CHART OPTION 34.95 

GRAPHIT 39.95 

PLOTTING GRAPHS PRINTER CASS 20.99 

PLOTTING GRAPHS VIDEO CASS 20.99 

AOS UTILS. SCREENPACKER PLUS 49.95 

POWEROOT II l/lll SPEC. PRINTER 59.95 

OOTWRITER 4.0 l/lll OR 4 (SPECIFY) 74.95/94.95 
DOTWRITER 4.0 l/lll WITH LOS 94.95 



WORD PROCESSORS 

& PRINTER DRIVERS 

FOR 

SUPERSCRIPSIT 

TYPITALL l/HI/4 SPECIFY 119.95 

TYPITALL W/SPELLING CHECKER 169.95 

ELECTRIC PENCIL 2.0Z l/lll 79.95 

M-SCRIPT l/IM/4 79.95 

LESCRIPT I/III/4 109.95 

CLEAN SLATE l/lll 49.95 

POWERDRIVER-0 OKIOATA 92/93 29.95 

POWERDRIVER-E EPSON 29.95 

POWERORIVER-P PROWRITER 29.95 

POWERORIVER-S STARWRITER 29.95 

POWERORIVER-FX AND RX EPSONS. . . 29.95 
POWERORIVER-A LEADING E06E 1020. . . 29.95 

EPSON ORIVER COMPILER 29.95 

»OWERSCRIPT FOR SCRIPSIT l/lll 34.95 



OPERATING 
SYSTEMS 

CP/M 2.2 MONTEZUMA MOO 4 199.95 

DOSPLUS II 11/12/16 IZ-80) 194.95 

DOSPLUS 4A WITH M-ZAL* 139 95 

DOSPLUS 3.5 l/lll 94.95 

DOSPLUS 3.3 MOO I S OR DO 39.95 

HARD DISK DRIVERS FOR DOSPLUS ... [CALLI 
MULTIOOS l/HI/4* 84.95 

'MJU-BO VERSIONS AHAIUIBLE 





1 HYPERCROSS/XT 3 
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COPY YOUR FILES TO/FROM 4+ 

TRSOOS-MSDOS-CP/M 
SPECIFY MOO 1 DD. Ill or 4 
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BOOKS,CHARTS & MISC 

INSIDER SUPER UTILITY 3.0/3.2 17.95 

INSIDER SUPER UTILITY 2.2Z 17.95 

SUPER UTILITY TECH MANUAL 3.X 13.95 

TRS-80/Z-80 ASSEMBLY LIBRARY 31 95 

TRS-80 DISK & OTHER MYSTERIES .... 1995 
THE CUSTOM TRS-80 & OTHER MYST 26.95 

MICROSOFT BASIC DECOOEO 26.95 

MACHINE LANGUAGE OISK I/O 26 95 

BASIC OISK I/O & OTHER MYST 26 95 

HOW TO DO IT ON THE TRS-80 26.95 

TRSOOS 2 3 DECODED & OTHER MYST. . 26.95 

BASIC FASTER & BETTER 26.95 

BFB LIBRARY DISK l/lll 16.95 

BF8 DEMO DISK l/lll 1695 

TRSD0S6/LD0S PROGRAMMERS GUIDE 18.95 

GREEN SCREENS I/II/III/4/4P 16.95 

DISKETTES SSOD 10 IN PLASTIC BX. . 19.50 

CLEAN SLATE THE BOOK 15.95 

PROFILE 3+ COMMANDS WALL CHART* . 4.00 
VISICALC COMMANDS WALL CHART 1 . 4.00 

SUPERSCRIPSIT WALL CHART * 4.00 

MODEL III BASIC WALL CHART * 4 00 

MODEL 4 BASIC WALL CHART* 4.00 

L 'CHARTS NOT SNIPPED AS SEPARATE ORDER A 



r UTILITIES 

MONITOR #5 I/III/4 SPECIFY 22.95 

THE TOOLBOX FOR LOOS 44.95 

LC COMPILER/EDAS 139.99 

ALCORC LANGUAGE COMPILER l/lll . 139.00 

ALCOR EDITOR l/lll 49.00 

ALCOR ADVANCED DEVELOPMENT PKG. 69.00 
ALCOR C COMPLETE SYSTEM l/lll. . . 250 00 
ALCOR MULTI-PROCESSOR ASSEMBLR . . 69.00 

AOSSUPERKEYS MOD III 35.00 

6.0 PLUS 39.95 

THE TOOLBELT MOO 4 49 95 

IMPAKTFOR BASIC l/lll 39.95 

PRO-CESS MOD 4 APPEND CMD FILES . . 37.95 
PRO-CREATE MOD 4 ED/ASSEMBLER . . 94.95 
PRO-CURE MOD 4 TO CP/M TRANSFER .... 46.95 

PRO-OUCE MOD 4 DISASSEMBLER 37.95 

PRO-PADS MOO 4 PART. DATA SETS . 37.95 

ENIGMA ENCRYPTION UTILITY 39.95 

BASIC-S COMPILER SYSTEM 34.95 

M-ZAL RELEASE 3 MOD l/lll 84.95 

ZUES EDITOR/ASSEMBLER l/HI/4 74.95 

MASTER MECHANICS SET FOR LOOS . 34 99 

E-BASIC (SPECIFY DOS) 49 95 

SYSTEM DIAGNOSTIC I/III/4 89 99 

C0NV3TO4 44 95 

TRASHMAN 34.50 

FASTER 24.95 

RPM 22.50 

OSMBLR III l/lll 34.95 

ACCEL 4 BASIC COMPILER l/lll 94.95 

EDIT BY SOUTHERN SOFTWARE l/lll . , 35.99 
BACKREST HARD DRIVE 

BACKUP III OR 4 94.95 

PRO-ZCAT MOD 4 CATALOG UTIL 27.95 



INSTRUCTIONAL 

VIDEO TAPES 

VHS/BETA 

PROFILE III PLUS 36 99 

SUPERSCRIPSIT 36.99 

LAZY WRITER 36.99 

NEWOOS-80 36.99 

SCRIPSIT 36 99 

TRSOOS 1.3 (MOD Mil 3699 

TRSOOS 6 (MOD 4) 36 99 

TRSD0S6 DISK I/O (MOO 4) 36.99 

TRSOOS 13 DISK I/O (MOD III) 36.99 

MULTIOOS 36.99 

DOSPLUS 36.99 

LDOS 5.|X) 36.99 

VISICALC 36.99 

CP/M 2 2 MONTEZUMA (MOO 4) 36.99 

MULTIPLAN (MOO 4) 36.99 

PFSFILE (MOO 4) 36.99 

MOD I LEVEL II BASIC 46.99 

MODEL III BASIC 46.99 



NEW ITEM! 

TRS-80 Encyclopedia 

Covers the models I, III 
and 4 extensively. A 
must have item for your 
TRS-80 library. Over 400 
pages of valuable infor- 
mation Appearing alpha- 
betically in encyclopedia 
fashioa ONLY 19.95 



ELECTRIC tTEMTER 



ONLY 
119 95 



149 95 SAVE 20°o 
WITH CORRECTING FEATURE 



Reviewed as l^e best pioof'eaoe' and tpeiing cnerne- 
OR Ihe "i>kel Woiks ml* SCRIPS'! I AT* WRi'f » 
ElEHRIC PENCIL ZO«lOf NEWSCRiPI COWARD 
and ACORN SSUPERSC RIPS' I Seja'aieve'swiavaii 
able lv R-S SUPERSCRIPSH '-.on Ml 
•talu't ■> 149 95 

i» met ni.it 

hyphenation irmr tut 

SmtMHAH A STYLE CHECKER* 31 lb 

M 10 I'M 

' Snlr R »phenal>< > n & g-anm,,' (Al 



ICS PROFESSIONAL 



INVENTORY CONTROL 
SALES REGISTER 
INVOICING 
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mventtxv. ^voicing and sales 
•egtslef system wet maintain over ? 500 item oa 
MOD Ml Aooom *ftin bull in accounting to* sales tax 
sales r,:* tx '• :ifte - ent saies people Pints sales 
•egisters invoices and many different inventory 
r erjorts on 80 or 13? col Printer Tracks bactaxders 
am will also re-order on predelermned quantities 
Also maintains cost ot entire inventory A GRFAT 



MOD 



IEIIIII 1? 



ONLY 69.95 
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NEW SUPER UTILITY- 
t VERSION 3.2 

Includes Operator* Manual 

and 2nd Backup Disk 
The Book Inside SU • 3.2 

NOW ONLY 17.95 



Experience) a legend with the 

program voted as the outstanding 

utility of 1962 and 1903 

MOO I or MOD HI P'oiec'.ed Media 
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Financial Planner 



• M-*le.n * k >« budgr' ,««?»*•, * ■ «•#• 

.t««4oo»i • »Nrt» ctMKm if *»-« • *«•, . 

iMlWB-ai. rfegpat a-afl | if»n»t W *»»t e Vy • Min 

• ^-»e*d- H t*f bay* •QW-I*a)|-»« • altMS "»t taMPS-a* 
*%*«* »Wf* • 0n» or«o>r* *4*«>n UfT Tt^aOot*-. (<#■>' 

^ty-]^»g>e'r»^noMr.t v.-tw-eur) *#a-w "i"sjl i«-™ 
*K* * ;•!•-«* rW • T '«V«IC*aBPa -*•« fit? y>' MCt-t} 0*vvi 
tMdGtr CI*f«J0f-H • f(«fS'>imaKt>3-««l(YaiVpPWl« M*rt*-- 
»*at>i4-Cttan h-Uur> • P'vrakH h. tan pttftnt* ft. cM0y T b* (a* 

'*» pr-e-rarn <1»M> dam ftrtt lOft,' «e*>fWart|} -Ot, 3 «U <T> « -»'**«' 
WwcrrjaxRjffl "Dtw ('q--M«g Nrw-or t9fcV 
MOOm 



. » 



IMS ■trail 
SPECIAL lur 



Now program in the "C" language 
compiler subset for LDOS LC gener- 
ates Z 80 EDAS IV source code as 
output. Compiled programs run on both 
MOD I and MOD III Save $60.00 with 
the best LDOS editor assembler pack- 
age on the market Over 200 pages ot 
documentation Requires 2 drives and 
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FOR LOOS MOO I" 
■00 4 VERSION AVAILABLE 
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Retail 99 95 
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PUBLISHED BY POWERSOFT 
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INFOSCAN 

i Small SyVam 



44.95 
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PRINTER RIBBONS 

First Quality Brand New-No Reloads 

PRINTER PRICE EA. BOX OF 6 

ANADEX 9500 SERIES/9620/9625 9.00 48.00 

C. ITOH 8510 PROWRITER 7.00 36.00 

C. ITOH A10/F10/DWP 210 (FILM) 5.00 26 00 

DMP 2100/TOSHIBA 1350 8.00 44 00 

DW ll/OWP-410 (MULTI STRIKE FILM| 6.00 32.00 

EPSON MX-80/FX/RX 6.00 32.00 

EPSON MX-100 9.00 48.00 

LP lll/V 6.00 32.00 

0KI0ATA 80/B2A/83A/92/93 4.00 20.00 

0KI0ATA 84 5.00 26.00 



GRAPHIC GAMES 

AND 

SIMULATIONS 

VOYAGE OF THE VALKYRIE l/lll 29.95 

VOYAGE OF THE VALKRIE TAPE 19.95 

MELTDOWN (NUCLEAR POWERPLANT). . . 19.95 
GAMEPAK-3 (FUNFACE. MATCH. ETC.} 29.95 
PR0-PIX NFL VERSION 29.95 



^DISKETTES* 

10 single side 

double density with 

hub ring packaged 

in a handsome 

smoke plastic 

library case. 

ONLY 19.50 

Guinnleed 

NOTE Diskettes do not 

quality towards tree 

^ fograns ^j 







Powersoft does it again with a collection ot 1 6 1 
ot the most popular LDOS TOOLBOX utilities 
re-puWished tor TRSDOS 6 running on the 
MODEL 4 Now enhance your MOD 4 
TRSDOS with this powerful sel o» utilities 
Complete with detailed manual on how to use 
each utility program to do I he many things 
the TOOLBOX lot LDOS was famous tot 

Model 4 



■JjtoskCount 



214-680-8268 



Send Cash, Check ot Money Order. 

Please add $3.00 tor postage and handling, additional $2.00 tor C.O.D.s 

Foreign orders welcome, please specify air or surface 

All shipping charges assumed by purchaser 

When ordering by mail, please specify computer model number 

Phone Your Order In Today Or Mail To. 

0ISKC0UNT DATA, 2701 -C W. 15th St., Suite 324, Piano, TX 75075 

Office Hours Mon-Frt 10AM to 9P.M. C.S.T 



H 1 



^^5F, Cheerfully Accepted 



MODEL 4 



ELECTRONICS 



MODEL 16 



MODEL 12 




MOD 2000 W/MONO MONITOR 2299.00 

16K MODEL 4 CASS VERS 579.00 

64KMODEL42DRRS232 935.00 

64K MODEL 4 PORTABLE 935.00 

80KMODEL121 DR 2189.00 

80KMODEL122DR 2719.00 

256KMODEL161 DR 3099.00 

256KMODEL162DR 3629.00 

256K MODEL 161 DRW/HD 4999.00 

8K MODEL 100 PORTABLE 459.00 

24K MODEL 100 PORTABLE 569.00 

15MEGHDMOD12/16W/KIT 2318.00 

5 MEG HD MODEL III/4 W/KIT 1999.00 

10 MEG 

HD MODEL 2000 INTERNAL 1439.00 



MOD 2000 W/COLOR MONITOR 2669.00 

MOD 20001 DRIVE W/HARD DISK . . . .3299.00 

DMP 105 PRINTER 145.00 

DMP 110 PRINTER 269.00 

DMP120 PRINTER 359.00 

DMP200 PRINTER 379.00 

DMP430 PRINTER 585.00 

DMP 500 PRINTER 999.00 

DMP 2100 PRINTER 1069.00 

DMP 2100 P PRINTER 1499.00 

DWP210 DAISYWHEEL 429.00 

DWP410DAISYWHEEL 549.00 

DWP 510 DAISYWHEEL 1139.00 

DWP II DAISYWHEEL 819.00 



100% RS COMPONENTS NO FOREIGN DRIVES OR MEMORY FULL WARRANTY 

ALL RS SOFTWARE 20% OFF CATALOG PRICE 

CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS 



(817) 825-4027 



NOCONA ELECTRONICS • box 593 • nocona, tx 76255 
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You'll never have to write another user-input routine 
for your Basic programs. Formatter lets you 
define an input prompt and call it with 
a single line of Basic. 



Easy Input 




riting user-input 
routines can be 
frustrating. You 
need to define 
what type of in- 
put is acceptable (numeric or alphanu- 
meric characters, upper- or lowercase, 
and so on) as well as the number of 
characters allowed. Not only is this a 
complicated chore, it also makes for 
lengthy programs. 

I've written a statement that lets you 
easily define the format for user input 
in your Model III Basic programs. It 
shortens your programming time and 
your programs; the input statement 
fits in just one line of code. 

My input statement works with 
NEWDOS80 and TRSDOS. To use it, 
you have to type in Program Listing 1 
(Formatter) and assemble it under a file 
name like FORMAT/CMD. 

Before you can program with the in- 
put statement, you must set the memo- 
ry size or HIMEM at eight less than the 
program's starting address (at the label 
Setup). If you want to assemble the 
program at the top of memory, use the 
origins and memory sizes in Table 1. 
You must set the memory size at ei- 
ther DOS Ready or after you enter Ba- 
sic, depending on which DOS you use. 
If you don't have a disk system, 
you'll need to load the machine-lan- 
guage program by typing in SYSTEM 
and execute it by pressing the slash key 
(/) followed by the enter key. Disk Ba- 
sic users should assemble the program 
into a /CMD file and execute it from 
Basic by entering CMD' 'FORMAT 
/CMD" in NEWDOS80. In Model III 
TRSDOS, use the following line 
(change the FD7B to the origin you use 
when assembling the program): 

CMD"L",'FORMAT/CMD":DEFUSR0 = 
&HFD7B:X = USR(0) 



Formatter stays patched into Basic 
(even if you type NEW or load 
another program) until you exit Basic 
or turn off the computer. 

Program Listing 2 is a demonstra- 
tion of how you can incorporate For- 
matter into a Basic program. Try it to 
see the options that Formatter pro- 
vides. The Figure shows a sample 
screen dump from Listing 2. 

Using the Input Statement 

Once you've taken care of the mem- 
ory size and are in Basic, you can use 
the input statement in any program. 
Type it in using the following syntax: 

INPUT® printat, flag, USING string ; variable 

The printat value works the same as 
in a PRINT® statement; it simply 
moves the cursor to the selected screen 
position. 

By changing the flag value, you can 
limit the format of any input to such 
options as only numerals or uppercase 
letters, select the speed at which the 
cursor blinks, select whether or not you 
want the background displayed, and so 
on, as shown in Table 2. Only the bits 
in the low-order byte of the flag value 
control the seven parameters. 

The string defines the input's for- 
mat. The string must contain at least 
one pound symbol (#), since pound 
symbols indicate the spots you want to 
leave for user input . You can use other 
symbols in the string, but they appear 
as themselves on the screen and aren't 
replaced by input. The pound symbols 
appear in the input line as either the 
background character or spaces, de- 
pending on how you set bit 2; user in- 
put then replaces these characters. 

After you enter data, the output 
variable's length is equal to the num- 
ber of pound symbols in the format 



by Roger A. Smith Jr. 

string. The string is padded with 
spaces on the right if necessary. 

The input statement accepts Basic 
commands such as those listed in Ta- 
ble 3. If you omit the flag value (as in 
the last example in Table 3), the state- 
ment defaults to the last flag value used. 

Formatter generates an error if you 
press the up- or down-arrow key when 
bit 1 of the flag value is zero. This lets 
you use the up- and down-arrow keys 
as control keys (see line 190 of Listing 
2 where I use START and END to 
demonstrate this). For example, you 
can press the down-arrow key when 
you've finished entering data, and the 
program can trap the input error and 
take the appropriate action. The up- 
arrow key generates error code 100 
(ERR/2+1 = 100) and the down-ar- 
row key generates error code 101. 

If you set bit zero of the flag value 
equal to 1, the user can enter only the 
numerals zero to 9. By setting bit 1, 
you disable the error statement for the 
up- and down-arrow keys. Set bit 2 to 
make the background appear as spaces. 
If you set bit 3, the program ignores 
your pressing the enter key unless you 
haven't entered any characters or if 
you've already entered the maximum 
number of characters. If you set bit 4 
as a 1, the cursor won't flash. Setting 
bit 5 as a 1 means you can't enter low- 



The Key Box 

Model ID 

1 6k RAM Cassette Basic 

32K RAM Disk Bask 

Assembly Language 

Editor/ Assembler 

NEWDOS80 

TRSDOS 



LOAD 80 
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This is a demonstration of the formatted input routine. 

When 'FORMAT?' appears, type in the format string. Try 
using 'PHONE (#•#) #M-t#it'. 

When 'FLAG?' appears, type in the flag value. Try '9' 
(numerals only, maximum or no characters only) . 

When 'PRINT AT?' appears, type in the print at location. 
Try '860'. 

After you enter the print at location, the input statement is 
executed. Experiment with the backspace, up and down arrows, 
and the <ENTER> key. 



FORMAT? PHONE (Ml) *»«-**«* 
FLAG? 9 

PRINT AT? 860 



PHONE (...) 



Figure. Sample screen dump from Program listing 2, the demonstration program. The line at 
the bottom right is for user input. 



Origin 

16K 7D7B hex 
32K 0BD7B hex 
48K 0FD7B hex 



Memory Size 

32115 7D73 hex 
48499 BD73 hex 
64883 FD73 hex 



Table I. Origins and memory sizes for different amounts of RAM. Refer to this chart if you 
want to assemble Formatter at the top of memory. 



Bit Function 


Weight 


numerals only 




1 no return on up or down arrow 




2 no background displayed 




3 maximum or no characters onlv 




4 no cursor Hashing 


16 


5 caps lock 


32 


6 cursor blink speed 


64 


7 (see Table 4) 


128 


Table 2. Individual bits within the flag byte control various fund ions of the format ted input 


statement. Add the weights together to select the functions you wish. For example, to allow 


numbers only with no background displayed and a nonflashing cursor 


use a flag value of 


21 (I + 4 + 16). 





lNPUT@256,FL.USING"##r , ;A$ 

INPUT@PA/2 + 1 . 128 + 32 + 2 + 1 .USING B$ f AS;CS 

INPUT® 1000*SIN(X),USING 'W/lr7Ir* , ;DS 

Table 3. Sample Basic commands that the input statement accepts. 



Bit 6 Bit 7 


Cursor Speed 


Weight 





Slowest 





1 1 


Slow 


192 


1 


Fast 


128 


1 


Fastest 


64 


Table 4. Bits 6 and 7 of the flag select the rate at which the 


cursor blinks. 



ercase letters. Bits 6 and 7 control the 
speed at which the cursor flashes as 
shown in Table 4. To set more than 1 
bit, add up their values from the 
weight column in Table 2 and use that 
number in the input statement. 

In addition to the new input state- 
ment, Formatter adds a new function 
to Basic. The &POS function returns 
the current cursor position as an inte- 
ger from zero to 1023. Use this when 
you want the INPUT® to occur at the 
current cursor position; type: IN- 
PUT® &POS, flag, string; variable. 

How Formatter Works 

Patching Formatter into Basic re- 
quires several vectors (a vector is a 
branch or jump to another location). 
ROM takes one vector when it en- 
counters the ampersand (&), such as in 
the &POS function. When the ROM 
comes across the ampersand, it jumps 
to 4194 hex. At 4194 hex, the program 
checks to make sure that POS follows 
the ampersand and then jumps to the 
new &POS routine. If POS doesn't 
follow the ampersand, the program 
uses the original vector jump. If POS 
does follow the ampersand, then the 
program puts a 2 in 40AF hex, where 
the ROM determines with what type 
of data it's working. If 40AF hex con- 
tains a 2, then the data is in integer for- 
mat; a 3 means you're dealing with 
strings; 4 represents single-precision 
numbers and 8 double-precision num- 
bers. I use a 2. 

Hex address 4020 stores the cursor 
position, but, since video RAM starts 
at 3C00 hex, you must subtract 3C00 
hex from the cursor position's value. 
The result is placed in 4121 hex, where 
the ROM expects to find an integer. 

The ROM's Input routine jumps to 
41D6 hex when it arrives at the first 
nonspace character after the input 
token. The accumulator will contain 
the character. Therefore, the first in- 
struction in the Input patch checks the 
A register for an @ sign; if there isn't 
one, the program takes the old vector 
exit. If the accumulator does contain 
an @ symbol, the program calls the 
ROM routine at 2B01 hex. This rou- 
tine determines the value of the ex- 
pression starting at HL + 1 , puts this 
value into the DE register, and then 
exits, putting the most significant byte 
in A. 

If the value is less than zero or 
greater than 1,023, the A register con- 
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C P/M . . .The Software Key 
That Unlocks Your Model 4 

CP/M is the standard 8-bit Z-80 operating system and many thousands of programs have been written to run under this 
system. With Montezuma Micro's CP/M you can run these programs on your Model 4/4P. Think about all those nationally 
known programs you've wanted to use. Programs like WordStar, dBASE II; SuperCalc; MultiPlan etc. With our version of 
CP/M 2.2 all those public domain programs on bulletin boards across the USA are available for free downloading. CP/M is 
the missing link that joins all this software to your Model 4/4P. Montezuma Micro's CP/M comes ready to use and requires 
no hardware modifications. This product has been awarded the best and highest ratings in the reviews and we are 
continuously improving it with you in mind. With our CP/M you get more than just a DOS. You get the other half of your 
Model 4/4P. 



AVAILABLE NOW FOR IMMEDIATE SHIPMENT 



Less Hard Disk Drive Support $1 69 

Optional Hard Disk Drive Support $ 30 



FEATURES 

• Full range of floppy drive support. Dual-head and/or 80 
tracks 

• Optional Radio Shack hard disk support allows partitioning 
and selective assignment of logical drives. Easy backup 
routine. 

• Memory drive allows the use of the other 64K RAM bank 
on 128K machines. 

• Modem 7, a powerful public domain communications 
program furnished at no charge, allows forfile transferand 
remote database access such as CompuServ and The 
Source. 

• CONFIG is our flexible utility that allows complete control 
of all operating parameters from menus. Format, read and 
write more than 30 different manufacturer's disk formats 
with more being added rapidly. 

• Disk Utility Program allows fast format, backups and 
verifying of ours and other manufacturer's disks. 

• These CP/M utilities are included; ASM; DDT; DUMP; ED; 
LOAD; MOVECPM; PIP; STAT; SUBMIT; SYSGEN; and 
XSUB. 



WHY BUY OURS? 



Transient Program Area (TPA) 
Bytes free in MBASIC 
Bytes free of formatted disk 
64K Memory drive 
Double-Side/80tk drive support 
Format, read/write other 
CP/M formats 

Communication program included 
Share HD with TRSDOS/LDOS 
Assign multiple drives to HD 
Boots from Hard Disk (4P) 
Popular terminal emulation 
User defined function keys 
Timely product support 



MONTEZUMA 
MICRO 

55K 
30.776 

196K 

YES 

YES 

YES 
YES 
YES 
YES 
YES 
YES 

9 
YES 



RADIO 
SHACK 

52K 
1 8.488 
160K 

NO 

NO 

NO 

NO 
NO 
NO 
NO 
NO 
3 
NO 



128K MEMORY UPGRADE 

Our upgrade kit includes 64K RAM, a geniune PAL chip and instructions 
for installation. This kit will upgrade your 64K Model 4 to 1 28K and 
allow the use of our MEMLINK program and the TRSDOS 6.x 
MEMDISK. Guaranteed 1 year. 

A BARGAIN AT ONLY $74 Model 4 
S64 Model 4P - No PAL 



This popular software is available for the Model 4/4P 
using our CP/M. 

WordStar Fast memory-mapped version 3.3 S250 

MailMerge Multi-purpose file merging program ... 125 

SpellStar 20,000 word proof-reader on a stick 125 

Starlndex Creates indices and Tables of Content. . . 85 

DataStar Data entry and retrieval is yours 175 

ReportStar Report generator and file manipulator 150 

InfoStar The above two programs 300 

dBASE II with Disk Tutorial 385 

CBASIC version 2.8 85 

TURBO PASCAL by Borland. This is the one 45 



ORDER INFORMATION 

Call now and your order will be shipped immediately We accept 
American Express, MasterCard and Visa plus we ship COD (cash or 
cashier's check only). Credit cards are not charged until your order is 
shipped. Add S4 shipping per item on orders within the 48 states. 
Suitability of the software is the responsibility ol the purchaser as 
there are NO REFUNDS. Defective items will be replaced upon their 
return, postpaid. 



ORDER NOW TOLL FREE 

800-527-0347 
800-442-1310 

The Toil Free lines are for orders only 
Specifications sub|ect to change without notice 



CP/M is a Trademark of Digital Research. Inc Interchange and Memimk are Trademarks of Montezuma Micro. TRS-80 is a Trademark of the Tandy Corporation. WordStar MailMerge. SpeiStar 
Starlndex InfoStar ReportStar DataStar SuperSon and CaKStar are Trademarks of MicroPro International Corporation Muitiplan is a Trademark of Microsoft 




NV0NTEZU1AA 
MICRO 



214-339-5104 

Redtxrd Airport Hangar # 1 8 

P O Box 32027 

Dallas Tx 75232 -- 41 ' 

'WE KEEP YOU RUNNING 




*~ See List of Advertisers on Page 1 76 
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tains a value greater than 3. The pro- 
gram compares A to 4. If the com- 
parison doesn't generate a carry, the 
program jumps to 1E4A hex, generat- 
ing a function call error. 
The program adds DE's value to 



3C00 hex to generate the PRINT® 
position, which it places in 4020 hex. 

An RST 8 checks for the comma fol- 
lowing the PRINT® value. If the next 
byte contains the Using token, the 
program jumps to the Using routine. 







Prvgrum Listing I. 


formatter. 










00110 ;•• 


FORMATT1 


*• 


00120 ;•• 




By Roger Smith 


M 


8B13B ;•• 






• * 


0B140 ;** 


Copy 


right 1983— NTS, Inc. 


• * 


BB15B ;** 


Used by 


permission of NTS, Inc. 










0B170 








0B1BB 


ORG 


0FD7BH 


; CHANGE IF NEEDED 


00190 CURCHR 


EQU 


143 


jCURSOR CHARACTER (CHANGE IF D 


ESIRED) 








BB2B0 BCKCHR 


■00 


238 


(BACKGROUND CHARACTER (CHANGE 


IF DESIRED) 








BB21B KElSUB 


EQU 


2BH 


;ROM KEYBOARD SUBROUTINE 


0B220 TEST 


EQU 


0AP4H 


.•GENERATES TM ERROR IF REG1 IS 


NOT A STRING 








8B238 TMERR 


EQU 


0AF6H 


(GENERATES TM ERROR 


BB240 SNERR 


EQU 


1997H 


(GENERATES SN ERROR 


00250 ERROR 


EQU 


19A2H 


(ROM ERROR ROUTINE 


00260 PCERR 


EQU 


1E4AH 


(GENERATES FC ERROR 


00270 VARPTR 


EQU 


260DH 


; RETURNS VARPTR 


00280 GETINT 


EQU 


2B01H 


(EVALUATES INTEGER EXPRESSION 


00290 EVAL 


EQU 


2337H 


(EVALUATES EXPRESSION 


00300 CAPS 


EQU 


4019H 


fCAPS LOCK 


•0310 CORPOS 


EQU 


4020H 


(CURSOR POSITION 


00320 INKEY 


EQU 


4099H 


(LAST KEY PRESSED 


00330 TABPOS 


EQU 


40A6H 


(CURSOR TAB POSITION (0-63) 


00340 KEYBUF 


EQU 


40A7H 


(POINTER TO KEYBOARD BUFFER 


00350 TYPE 


EQU 


40AFH 


(VARIABLE TYPE FLAG 


00360 POOL 


EQU 


40B3H 


(NEXT AVAILABLE LOCATION IN ST 


RING LITERAL 


POOL 






00378 POOLAD 


EQU 


40B5H 


(STRING LITERAL POOL 


003 88 REG1 


EQU 


4121H 


(REG1 (INTEGER AND STRING) 


003 90 VAND 


EQU 


4194H 


ri VECTOR 


00400 V INPUT 


EQU 


41D6H 


(INPUT VECTOR 


00410 SETUP 


LD 


HL,(VINPUT+1) 


(GET INPUT VECTOR 


00420 


LD 


DE, ENTRY 


;GET ENTRY 


00430 


RST 


18H 


(COMPARE HL AND DE 


00448 


JR 


NZ,SETUP2 


)IP NOT ALREADY PATCHED THEN S 


ETUP2 








88458 


LD 


HL, (ADDR1) 


(ELSE GET ADDRESSES 


88468 


LD 


DE, (ADDR2) 




1 1 1 | 


LD 


BC, (CODES) 




08488 


JR 


SETUP3 




00490 SETUP2 


LD 


DE,(VAND+1) 


• ' i ' VECTOR 


08580 


LD 


A, (VAND) 




II >u 


LD 


B,A 




88520 


LD 


A,(VINPUT) 




00530 


LD 


C,A 




00540 SETUP3 


LD 


(OUT*l) ,DE 


(STORE ADDRESSES 


MS! 1 


LD 


(OUT1+1) ,HL 




00561 


LD 


(ADDRl) ,HL 




00570 


LD 


(ADDR2) ,DE 




IfStt 


LD 


(CODES) ,BC 




00590 


LD 


A,B 




MCM 


LD 


(OUT) ,A 




l'L'OIi' 


LD 


A,C 




00620 


LD 


(OUT1) ,A 




00630 


LD 


HL, ENTRY 


(PATCH INTO 


•««4I 


LD 


(VINPUT+1) ,HL 


1 VECTORS 


MCSI 


LD 


HL,POS 




.Vfif..' 


LD 


(VAND-fl) ,HL 




00670 


LD 


A,0C3H 


(0C3H - JP 


80680 


LD 


(VAND) ,A 




08698 


LD 


(VINPUT) ,A 




00700 


RET 






00710 POS 


INC 


HL 


(CHECK NEXT 


00720 


LD 


A,(HL) 


( CHARACTER 


00730 


DEC 


HL 


(RESTORE POINTER 


00740 


CP 


0DCH 


; IS IT 'POS'? 


00750 


JR 


Z,POSl 


( IF SO THEN POS1 


00760 OUT 


JP 


8 


IIP NOT THEN RET 


00770 POS1 


PUSH 


HL 


(STORE LINE LOC 


08780 


LD 


A, 2 


(STORE INTEGER 


If7 M 


LD 


(TYPE) ,A 


» IN TYPE LOCATION 


00800 


LD 


HL, (CURPOS) 


(GET CURSOR POSITION 


00810 


LD 


BC.-3C00H 


» SUBTRACT 153 60 


00820 


ADD 


HL,BC 




008J8 


LD 


(REG1) ,HL 


(STORE IN REG1 


00840 


POP 


BL 


(RESTORE POINTER 


00850 


INC 


HL 


;BUMP PAST TOKEN 


00860 


RST 


10H 


(SKIP SPACES 


00870 


RET 




,-RETURN 


00888 








00890 ENTRY 


CP 


• (■ 


(INPUT§? 


00900 


JR 


Z, PATCH 


(IF SO THEN CONT 

Listing 1 continued 



The program evaluates the flag val- 
ue in about the same way as it does the 
PRINT® location, except it stores on- 
ly the E register (least significant byte). 

If the Using token doesn't follow 
the comma, the program jumps to 
1997 hex, generating a syntax error. 

The routine at 2337 hex evaluates 
the format string and any expression 
to which HL points. After the call to 
2337 hex, 40AF hex contains the type 
of result. If it is an integer (type = 2), 
then 4121 hex contains the result. If it 
is a single-precision number (type = 4), 
the program stores it in the 4 bytes 
starting at 4121 hex. If the result is 
double-precision (type = 8), the pro- 
gram stores it in 8 bytes starting at 
41 ID hex. 

If the result is a string (which you 
want here), then 40AF hex should 
contain a 3, and 4121 hex will point to 
the string descriptor. But before deter- 
mining that, the program looks for the 
semicolon that precedes the output 
variable. If it doesn't find one, it gen- 
erates a syntax error. 

Next, Formatter tests the type flag. 
If the flag's value is something other 
than 3, the program jumps to 0AF6 
hex, generating a type mismatch error. 
If it is a 3, the program loads the DE 
register with the string descriptor's ad- 
dress (from 4121 hex). The first byte is 
the length of the string. If the length is 
zero, Formatter generates a function 
call error. 

Register B and the location labeled 
TEMP store the length. Formatter 
loads HL with the next 2 bytes of the 
string descriptor, leaving HL pointing 
to the actual string. It stores the start 
of the string in STRING. C and LEN 
count and store the number of pound 
symbols in a string. An absence of 
pound symbols generates a function 
call error. 

Formatter loads register B with the 
background character based on bit 4 
of the flag. If you want to change the 
background, change the value in line 
200 of the Assembly-language text (the 
background must be under 32 [20 hex] 
or greater than 127 [7F hex]). 

The program loads DE with the cur- 
sor location and HL with the address 
of the string. The string appears on the 
screen with the pound symbols re- 
placed by the background character. 

The main input loop starts at Loop2 
where the program determines if 
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you've entered the required number of 
characters or whether it has reached a 
pound symbol in the format string; if 
either condition is met, the program 
branches to Match. If neither is true, it 
loops until it finds a pound symbol. 

I designed the NORM subroutine to 
keep DE pointing at video RAM so 
the input statement doesn't run 
through reserved RAM. INCDE sim- 
ply increments DE and then goes to 
NORM. 

At Match, either the background or 
a space appears on screen, depending 
on whether or not you've entered all 
the characters. Then the program calls 
KEYIN to get a character from the 
keyboard. 

If the character is a backspace, the 
program tests to see whether you've 
entered any characters; if you haven't, 
it ignores the backspace. If you have, 
you can backspace both the cursor 
and the format pointer (HL) until the 
pointer points to a pound symbol. 

If the character is a down- or up-ar- 
row, the program checks the flag to 
see if the error on either key is dis- 
abled. If it is, the program jumps to 
BADCHR which, in effect, ignores 
the character. Otherwise, the program 
loads the E register with the proper er- 
ror code and exits to the ROM error 
routine at 19A2 hex. 

If the character is a carriage return 
(13) and bit 3 of the flag value isn't set, 
the program jumps to the exit routine. 
If the bit is set, the program jumps to 
the exit routine only if you've entered 
all or none of the characters. 

At this point, if you've entered all 
the characters, the program jumps to 
BADCHR. If you haven't entered all 
the characters, the program loops 
back to Loop3. 

At Exit, the program erases the cur- 
sor and restores the pointers to the for- 
mat and display. INKEYS (4099 hex) 
becomes zero. Formatter loads IY 
with the contents of 40A7 hex, making 
it point to the input buffer. 

The program moves the characters 
you enter to the input buffer. The pro- 
gram replaces any remaining back- 
ground characters with spaces. 

The temporary string pointer at 
40B3 hex is restored to 40B5 hex to 
prevent an ST error (string formula 
too complex). A zero marks the end of 
the text in the buffer. 

The routine at 260D hex returns the 

Continued on p. 116 



listing 1 continued 








00910 


OUT1 


JP 





ELSE RETURN 


00920 


PATCH 


CALL 


GETINT 


EVAL INTEGER 


00930 




CP 


4 


> 1023? 


00940 




JP 


NC.FCEHR 


IP SO THEN FC ERROR 


009S0 




PUSH 


HL 


STORE POINTER 


00960 




LD 


HL,3C00H 


START OF VIDEO 


00970 




ADD 


HL,DF. 


ADD OFFSET 


00980 




LD 


(CURPOS) ,HL 


CURSOR LOCATION 


00990 




POP 


HL 


RESTORE POINTER 


01000 




RST 


8 


COMPARE ROUTINE 


01010 




DEFB 


' , ' 


FIND COMMA 


01020 




LD 


A, (HL) 


GET NEXT CHARACTER 


1 1 1 3 1 




CP 


0BFH 


•USING"? 


01040 




JR 


Z, USING 


IF SO THEN JUMP 


01050 




DEC- 


HL 


ELSE DECREMENT POINTER 


01060 




CALL 


GETINT 


EVALUATE INTEGER 


,i 1 1 7 1 




LD 


A,E 


GET LSB OF INTEGER 


01080 




LD 


(FLAG) ,A 


STORE IN FLAG 


■If 91 




RST 


8 


SEARCH FOR 


01100 




DEFB 


' , ' 


COMMA 


01110 




LD 


A,(HL) 


GET NEXT CHARACTER 


01120 




CP 


0BFH 


'USING'? 


01130 




JP 


NZ,SNF.RR 


IF NOT THEN SN ERROR 


01140 


USING 


INC 


HL 


INCREMENT POINTER 


01150 




POSH 


HL 


STORE POINTER 


01160 




CALL 


EVAL 


EVALUATE EXPRESSION 


01170 




POP 


HL 


RESTORE POINTER 


01180 


LOOPU 


INC 


HL 


INCREMENT POINTER 


01190 




LD 


A, (HL) 


GET CHARACTER 


01200 




OR 


A 


ZERO? 


01210 




JP 


Z,SNERR 


IF SO THEN SN ERROR 


01220 




CP 


1 ; ' 


SEMICOLON? 


01230 




JH 


NZ, LOOPU 


IF NOT THEN LOOP 


01240 




INC 


BL 


INCREMENT POINTER 


01250 


LOOPU2 


LD 


A, (HL) 


GET CHARACTER 


01260 




OR 


A 


ZERO? 


01270 




JP 


Z.SNERR 


IF SO THEN SN ERROR 


01280 




CP 


20H 


SPACE? 


01290 




JR 


NZ,EOL 


IF NOT THEN EOL 


01300 




INC 


HL 


ELSE INCREMENT POINTER 


01310 




JR 


LOOPU 2 


AND LOOP 


01320 


EOL 


LD 


(PTH) ,HL 


STORE POINTER 


01330 




LD 


A, (TYPE) 


GET VARIABLE TYPE 


01340 




CP 


3 


STRING? 


01350 




JP 


NZ,TMERR 


IF NOT THEN TM ERROR 


01360 




LD 


DE, (REG1) 


GET VARPTR 


01370 




LD 


A, (DE) 


A= LENGTH OF STRING 


01380 




OR 


A 


ZERO? 


01390 




JP 


Z,FCERR 


IF SO THEN FC ERROR 


01400 




LD 


B,A 


ELSE B= LENGTH 


01410 




LD 


(TEMP) ,A 


(TEMP)=LENGTH 


01420 




INC 


DE 


INCREMENT VARPTR 


01430 




LD 


A,(DE) 


GET LSB OF LOCATION 


01440 




LD 


L,A 


L=LSB 


01450 




INC 


DE 


POINT TO MSB OF LOCATION 


01460 




LD 


A, (DE) 


GET MSB 


01470 




LD 


H,A 


HL=»>STRING 


01480 




LD 


(STRING) ,HL 


STORE HL 


01490 




LD 


C,0 


COUNTER = 


01500 


LOOP 


LD 


A, (HL) 


COUNT THE NUMBER 


01510 




CP 


' !■ 


OF I'S IN 


01520 




JR 


NZ,NEXT 


THE STRING 


01530 




INC 


C 




01540 


NEXT 


INC 


HL 




01550 




DJNZ 


LOOP 




01560 




LD 


A,C 


A-NUMBER 


01570 




LD 


(LEN) ,A 


STORE IN (LEN) 


01580 




OR 


A 


ZERO? 


01590 




JP 


Z,FCERR 


IF SO THEN FC ERROR 


01600 




LD 


A, (FLAG) 


GET FLAG 


01610 




LD 


B.BCKCHR 


;LD B, BACKGROUND CHARACTER 


01620 




AND 


4 


TEST BIT 2 


01630 




JR 


Z , BCKGRD 


IF NOT SET THEN BCKGRD 


01640 




LD 


B,32 


ELSE BACKGROUND - BLANK 


01650 


BCKGRD 


LD 


DE, (CURPOS) 


GET CURSOR LOCATION 


01660 




LD 


HL, (STRING) 


GET POINTER TO STRING 


01670 




PUSH 


HL 


STORE STRING POINTER 


016 80 




PUSH 


DE 


STORE CURSOR LOCATION 


01690 


LOOP1 


LD 


A,(HL) 


GET CHARACTER 


01700 




CP 


'#' 


'♦•? 


01710 




JR 


NZ, CONTZ 


IF NOT THEN SKIP 


01720 




LD 


A,B 


ELSE A=BACKGROUND 


01730 


CONTZ 


LD 


(DE) ,A 


DISPLAY IT 


01740 




CALL 


INCDE 


INCREMENT CURSOR LOCATION 


01750 




INC 


HL 


POINT TO NEXT CHARACTER 


01760 




LD 


A, (TEMP) 


GET LENGTH OF STRING 


01770 




DEC 


A 


DECREMENT IT 


01780 




LD 


(TEMP) ,A 


AND STORE IT 


0179B 




JR 


NZ,LOOPl 


CONTINUE UNTIL TEMP=0 


01800 




LD 


A, (LEN) 


GET NUMBER OF I'S 


01810 




LD 


C,A 


STORE IN C 


01820 


CONT1 


LD 


(CURPOS) ,DE 


STORE CURSOR LOCATION 


01830 




LD 


A,E 


COMPUTE 


01840 




AND 


3FH 


TABPOS 


01850 




LD 


(TABPOS) ,A 


AND STORE IT 


B1860 




POP 


DE 


GET STARTING CURSOR LOCATION 

I. ist ing 1 continued 
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and Talks to 



It's called "OPEN ACCESS," and it's the 
result of (>() man years of effort to 
create a truly do-it-all. super-program- 
one that can perform virtually every 
task you're ever likely to encounter. 

The beauty of it is, all that capability 
resides on a single program. You don't 
have to re-enter data. Or spend time 
trying to get unmatched programs to 
work together. 

OPEN ACCESS takes its name from 
the source of its power— a relational 
data-base manager that gives you access 
to more data in more ways than any 
comparable software. 

OPEN ACCESS includes an electronic 
spreadsheet. 3-D graphics, word 
processor, appointment scheduler and 
telecommunications module— all 
revolving around the powerful 
information manager. 



INFORMATION MANAGEMENT-THE 
MASTERMIND. This advanced data-base 
manager stores and retrieves multiple files 
quickly, easily and reliably. What's more, It 
•hares all Information with the other programs, 
so you never have to re-enter the same data 
twice. 







ELECTRONIC SPREADSHEET-NUMBER 
CRUNCHING AND GOAL SEEKING. It helps 
you produce forecasts, cost estimates and 
"break-even" points- In seconds, Instead of 
hours or days. Best of all, it allows "goal 
seeking." Ask, for example, "What sales must I 
have the rest of the year to net $1 million?," 
and OPEN ACCESS will figure It out! 



3-0 GRAPHICS-NOT JUST PRETTY 
PICTURES. These graphics distill raw data 
into trends that can be instantly visualized, 
helping you discern the Important facts from 
a wealth of Information. 



r 

does Arithmetic. 



the World. 




Because they do not have a dedicated 
relational database manager that can 
quickly direct massive amounts of data, 
other programs simply cant do what 
OPEN ACCESS can. Some don't have a 
communications program, others no 
dedicated word processor. None have a 
time management program. 




There's just one conclusion: At S595, 
OPKN ACCESS can do more for you than 
any other comparable business program 
on the market. Bar none. But the only 
way for you to be convinced is for you 
to see OPEN ACCESS work its magic on 
your work load So call \our local 
software dealer today, or call us at SIM, 
at 619 «S0-1S2(>. 



'Xfc 




SPI 



sorrwAKE rwDorrs merwionai 



102-i() Sorrento Valley Road 
San Diego, CA 92121 
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WORD PROCESSING-EDITOR 
EXTRAORDINAIRE! Superior word processors 
make It easy to correct typos, change words, 
shuttle paragraphs and format documents. 
This Is one of that breed. Use It to write 
efficient memos, letters, proposals and 
reports. 



TELECOMMUNICATIONS- YOUR LINK WITH 
THE WORLD. This program gives you access 
to virtually any other computer system in the 
world. Not only can you transmit and receive 
reports from your colleagues, you can also 
subscribe to special data banks that know 
everything from GM's stock price to the 
relative humidity in Genoa. Now that's power! 



TIME MANAGEMENT-CONSERVING YOUR 
MOST PRECIOUS RESOURCE. This module 
helps you keep track of all your appointments, 
hour by hour, day in and day out. It alerts you 
to standing obligations, automatically 
coordinates meeting times with other busy 
professionals, and lists all your associates on 
a Rolodex™ -like file. 






Listing 1 continued 








01870 




POP 


HL 


jGET STARTING STRING LOCATION 


01880 




LD 


(SCREEN) ,DE 


.•STORE CURSOR LOCATION IN (SCR 


EEN) 










01890 


LOOP2 


LD 


A.C 


;A = NUMBER OF INPUT CHARACTER 


E LEFT 










01900 




OR 


A 


j ZERO? 


01910 




JR 


Z, MATCH 


(IP SO THEN MATCH 


01920 




LD 


A.(HL) 


j ELSE GET CHARACTER 


01930 




CP 


'•• 


;'•'? 


01940 




JR 


Z, MATCH 


;IF SO THEN MATCH 


01950 


LOOP3 


INC 


HL 


;NEXT CHARACTER 


01960 




CALL 


INCDE 


INCREMENT CURSOR LOCATION 


01970 




JR 


LOOP2 


;LOOP 


01980 


INCDE 


INC 


DE 


; INCREMENT CURSOR LOCATION SUB 


ROUTINE 








01990 


NORM 


LD 


A,D 


;KEEP DE ON SCREEN 


02000 




AND 


3FH 




02010 




OR 


3CH 




02020 




LD 


D,A 




02030 




RET 






02040 


MATCH 


LP 


A,C 


;GET INPUT CHARACTERS LEFT 


02050 




OR 


A 


;ZERO? 


02060 




JR 


NZ.MATCH2 


;IF NOT THEN MATCH2 


02070 




LD 


A, 32 


;ELSE A-SPACE 


02080 




JR 


MATCH 4 


(GOTO MATCH 4 


02090 


MATCH 2 


LD 


A,B 


;GET BACKGROUND 


02100 


MATCH 4 


LD 


(LOC) ,DE 


; STORE LOCATION 


02110 




LD 


(DE) ,A 


; DISPLAY CURSOR 


02120 




CALL 


KEYIN 


;GET CHARACTER FROM KEYBOARD 


02130 




CP 


8 » 


; BACKSPACE? 


02140 




JR 


NZ, NOTBK 


j IF NOT THEN SKIP 


02150 




LD 


A, (LEN) 


;GET LENGTH 


02160 




CP 


C 


;CP TO CHARACTERS LEFT 


02170 




JR 


Z , MATCH 


;IF SAME THEN MATCH 


02180 




INC 


C 


INCREMENT CHARACTERS LEFT 


02190 




LD 


A,l 


;A-1 


02200 




CP 


C 


;C-1? 


02210 




JR 


Z,ONE 


;IF SO THEN ONE 


02220 




LD 


A,B 


•ELSE GET BACKGROUND 


02230 




LD 


(DE) ,A 


j DISPLAY IT 


02240 




JR 


LOOPM 


;LOOP 


02250 


ONE 


LD 


A, 32 


(A-SPACE 


02260 




LD 


(DE) ,A 


; DISPLAY IT 


02270 


LOOPM 


DEC 


DE 


; BACKSPACE 


02280 




CALL 


NORM 


j KEEP DE ON SCREEN 


02290 




DEC 


HL 


j DECREMENT POINTER TO STRING 


02300 




LD 


A,(HL) 


(GET CHARACTER 


02310 




CP 


'#' 


; • * ' ? 


02320 




JR 


NZ, LOOPM 


j IF NOT THEN LOOP 


02330 




JR 


MATCH 


;ELSE MATCH 


02340 


NOTBK 


CP 


10 


j DOWN ARROW? 


02350 




JR 


Z.TEN 


;IF SO THEN TEN 


02360 




CP 


91 


;UP ARROW 


02370 




JR 


NZ.NOT91 


;IF NOT THEN SKIP 


023 80 


TEN 


EX 


AF,AP* 


.•STORE A IN A' 


02390 




LD 


A, (FLAG) 


(GET FLAG 


02400 




AND 


2 


,-CHECK BIT 1 


02410 




JR 


NZ, BADCHR 


(IF SET THEN BAD CHARACTER 


02420 




EX 


AF,AF' 


;ELSE GET VALUE 


02430 




LD 


E,0C6H 


(E- ERROR 100 


02440 




CP 


91 


;UP? 


02450 




JP 


Z , ERROR 


> IF SO THEN JUMP TO ERROR ROUTINE 


02460 




LD 


E.0C8H 


j ELSE ERROR 161 


02470 




JP 


ERROR 


;JUMP TO ERROR 


02480 


BADCHR 


LD 


A,B 


;GET BACKGROUND 


02490 




LD 


<DE),A 


; DISPLAY IT 


02500 




JR 


MATCH 


(CONTINUE 


02510 


NOT91 


CP 


13 


; ENTER? 


02520 




JR 


NZ,NOT13 


;IF NOT THEN SKIP 


02530 




LD 


A, (FLAG) 


.•GET PLAG 


02540 




AND 


8 


;CHECK BIT 3 


02550 




JR 


Z,EXIT 


;IF NOT SET THEN EXIT 


02560 




LD 


A, (LEN) 


(CHECK LENGTH 


02570 




CP 


C 


(SHOULD BE ALL 


02580 




JR 


Z.EXIT 


; (EXIT IF ALL) 


02590 




XOR 


A 


; OR NONE 


02600 




OR 


C 




02610 




JR 


NZ, BADCHR 


;IF NOT NONE THEN BAD CHARACTER 


02620 




JR 


EXIT 


;ELSE EXIT 


02630 


NOT13 


LD 


(TEMP) ,A 


; STORE CHARACTER 


02640 




XOR 


A 


jA=0 


02650 




OR 


C 


;C-07 


02660 




JR 


Z, BADCHR 


(IF C-0 THEN BAD CHARACTER 


02670 




LD 


A, (TEMP) 


;GET CHARACTER 


02680 




LD 


(DE) ,A 


; DISPLAY IT 


026 90 




DEC 


C 


; DECREMENT COUNTER 


02700 




JP 


LOOP 3 


; LOOP 


02710 


EXIT 


LD 


HL, (STRING) 


•GET POINTER TO STRING 


02720 




LD 


A, 32 


,• A- SPACE 


02730 




LD 


(DE) ,A 


(DISPLAY IT 


02740 




LD 


DE, (SCREEN) 


(GET STARTING CURSOR POSITION 


02750 




LD 


A, (LEN) 


;GET NUMBER OF INPUT CHARACTERS 


02760 




LD 


C,A 


(STORE NUMBER IN C 


02770 




XOR 


A 


,-A=0 


02780 




LD 


(INKEY) ,A 


(ERASE INKEYS 


02790 




LD 


IY, (KEYBOF) 


;IY-=>KEYBOARD BUFFER 

Latmi 1 continued 



Continued from p. IIS 

variable pointer of the output variable 
in DE; the routine at 0AF4 hex tests to 
make sure the variable is a string. 
Then control returns to the Input rou- 
tine in ROM. 

The KEYIN subroutine handles the 
cursor flash. The routine first stores 
most of the registers on the stack. 
Then it loads HL with the current 
screen location and stores the charac- 
ter in that location. The routine moves 
the top 2 bits of the flag into register B 
to control the speed at which the cur- 
sor blinks. It then displays the cursor 
(you can change the cursor character 
in line 190). 

Then Formatter calls the Scan sub- 
routine. Scan stores bit 5 of the flag 
value in 4019 hex, the Model Ill's caps 
lock location. Next it calls the routine 
at 2B hex to check the keyboard for a 
character. If the routine doesn't find a 
character or if you've pressed the en- 
ter, backspace, up-arrow, or down-ar- 
row keys, the program returns to 
KEYIN. If the character is less than a 
space, the program jumps to Bad, 
which returns to KEYIN after setting 
A to zero. 

If you haven't set bit zero of the flag 
value, all characters are legal, so the 
subroutine returns to KEYIN. If the 
character is less than zero or greater 
than 9, the program jumps to Bad. If 
the character is a numeral, the subrou- 
tine returns to KEYIN. 

KEYIN continues by determining if 
the character returned is a zero. If it 
isn't, KEYRET returns the character 
to the input routine. If bit 4 of the flag 
value is set, the program loops to 
NOFLSH, which keeps the cursor dis- 
played. Otherwise, the program loads 
B with the cursor speed, displays the 
previous contents of the video lo- 
cation, and loops back to LoopK un- 
til B is decremented to zero or you 
press a key. 

Now for the small print. The object 
and source code for the input routine 
are copyrighted by MTS Inc. as part 
of their Compuchurch line of soft- 
ware. You have the permission of 
MTS and myself to use this program 
for your own use. If you wish to distrib- 
ute any or all of Formatter to others, 
you must obtain my permission. ■ 

Write to Roger A. Smith Jr. at 505 
Ridge Lake Road, Crestview, FL 
32536. 
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NtONTEZUNVA 
NMCRO 



P.O. Box 2169 

Camp Verde (Lizard Flats) 

Arizona 86322 

WE KEEP YOU RUNNING 



COMPUTERS 

Model 4 with 2 Wives & RS-232 64K Complete $ 999 

26-1067 16K Model 4 Pure Hade Snack 765 

26 1069 2o Moos 4 64K BS232 Pure Radio Snack 1099 

26 1080 64K Model 4 PortaWe 2dr a RS232 1099 

76-3076 16K Color Computer 2. 144 

26 3027 16K E.iended BASIC Color Computet 2 179 

26-3177 64K Extended BASIC Color Compute" 2 179 

26 3134 16K Cow Compute- 2 99 

26-3136 16K E.lenoeo BASIC Color Computer 2 135 

26 3589 Pocket Compuler 3 with 4K RAM 86 

76 3590 Pocket Computer 3 84 

26-3601 Pocket Computer 7 89 

76-3650 Pocket Computer 4 59 

763801 Model 100 8K Ponaoie Computer 499 

26-3802 Model 100 24K Portable Computer 679 

76 4004 Model l? 1-Or.ve 2379 

76 4005 Model 1 2 2 Dove 7951 

26 5103 Mooel 2000 2<Jrive 128K 2333 

26-5104 Model 7000 w,Maid Disk and 256K 3599 

76*004 Model 168 1 Drive 3351 

76 6005 Model 16B 2 Onve 3925 

76-6006 Model 168 with bmt-m 15M0 Hard Disk 5352 

76 6050 DI-l Terrrwiai 499 

26-6052 NEWI DT 100 Terminal 675 

NEW LNW -TEAM" COMPUTER INS new computer (rom 

LNW has 160K RAM 5 3Mhz 780 and is IBM PC CompatiDle 

See tne LNW ad m tt»s lor io> details $1195 



MODEMS 



26- 1084 Mode. 4P Modem Board 

26 1173 OC Modem II 

26-1174 Acoust»c Couple Modem 

26 1175 OC Modem IB 

76-1176 DC-2212 High Speed Modem 
Anchor Mark l Modem 300 Baud witi 
Anchor 300/1200 Baud Modem wttn ( 
Mayes Smanmodem 300 Baud 
Hayes Smanmodem 1200 Baud 



PERIPHERALS 



LNW Expansion Interlace lor trie Model I complete wi 

RAM 6 omtin RS 237 

26 05H Genurne RS Pantyhose Anti-Care Device 

761085 Model 4P Carrying Case 

26-1131 Model 1/3/4 5MB Hard Disk Secondary 

76H33 Model 3 15MB Hard Disk Inst Kit 

26-1134 Model 4 15MB Hard Disk Inst Kit 

26-1183 Model 100 Bar Code Reader 

26 1185 NEW! Color Computer Koala Pad 

261197 NEW! Mouse lor Model 2000 

26-1198 NEW' Serial to Parallel Convener 

76-1708 CCR-81 Cassette Tape Recorder 

76 1209 NEWICCR82 Cassette Tape Recorder 

76-1376 Anti-Glare Panel Model 7/17/16 

26-1342 Clear Keycover lor Model 3/4 

26 1410 Model 100 Modem Cable 

76-1479 Automatic Power Strip/Surge Proieclor 

76-1451 Non-Aulomatic Power Stro/filter 

76-1457 AnnGlare Panel Model 1/3/4 

76 2226 Coky Compuler Deluxe RS-237 Kit 

76-3007 Coky Compuler Carrying, Case 

76-3006 Coky Compuler Joysticks Per Pa* 

26-3017 Coky Computer Deluxe Joystick/each 

76 3073 Coky Computer 1/2 Disk Drive 1 2 Of 3 

26-3024 Coky Computer MuHi-Pak interlace 

26-3075 Coky Compuler Mouse 

26 3029 Disk Drive lor the Coky Compuler 

26-3503 PC l Cassette interlace 

76-3508 PC I Carryng Case 

76 3608 PC 7 Carryug Case 

76-3612 PC 2 RS-232C interlace 

26-3615 PC 2 4K RAM Module 

26-3616 PC 7 8K RAM Module 

76-3651 PC 4 Cassette Interlace 

26-3653 PC 4 IK Ram Module 

26-3654 PC 4 Carry™ Case 

26 3804 Model 100 AC Adapter 

2*3805 Model 100 Acouslic Coupler 

26 3809 Model 100 Carrying Case 

26-4154 Model 12/168 Internal 1SM0 Hard Disk Kil 

26-4155 Model 2/3/4/12/16 15Mb Primary Hard Disk 

26-4156 Model 2/3/4/12/16 iSMb Secondary Dnve 

26-4157 Model 2/12/16 instakaton Kit lor 26-4155 

26-5111 Model 2000 VM i Monocnrome Monitor 

26 5112 Model 7000 CM-1 Coky Morvlry 



26 1305 
261308 
26-1324 
26-1325 
764303 
2*4305 
26-4306 
264307 
265115 
76 5116 
'4-0551 



FURNITURE 



Model 3/4 System Desk 
Un.vers.al Pnnter Stand 
Compute- Table 
Platform tor 26-1324 
Deluxe System Desk 
Deluxe Printer Stand 
rerrranai Stand 
Printer Stand 
Model 2000 Peoestai 
ModeJ 2000 Floor Stand 
Docu-Rack Stand 



PRINTERS & ACCESSORIES 

76-1158 Daisywheel II B Model White Case $1165 

76-1190 Plotter 179 

76-1197 GCP-1 15 Coky Graphics Primer 169 

2*1196 GT- 116 Graphics Pad 297 

76-1750 OWP-410 Daisywheel Prime- 799 

26 1252 DMP500 220CPS Pnnter 1099 

26-1254 DMP 200 I20cps Pnnter 594 

26-1255 DMP-120 120cps Dual Mode Pinter 424 

26-1757 DWP 210 Daisywheel Pnnier 509 

26-1261 TP-10 Thermal Malm Pnnter 85 

26-1767 DMP-420 140cps Triple Mode P-mle- 849 

26-1268 CGP-220 Coky Ink Jel Printer 594 

26-1269 PTC-64 64K Printer Controter (Butler) 212 

26-1270 NEW1DWP-510 Daisywheel pnnier 1270 

26-1271 DMP 110 sojps TnpB y^je p^tet 339 

26-1274 DMP 2100P 160cps Dual Mode Pnme- 1695 

26-1275 NEW1TRPIO0 Pnntei 2S5 

2*1276 NEW1DMP-105 New Cheeep Pknter 169 

26-1277 NEW1OMP-430 New Not So Cheeep Plmter 765 

26-1440 Sugle Bm Sheet Feeder lor DWP-2100 645 

26-1441 a Directional Traaor lor DWP-2100 144 

26-1443 Br-OtrecKyial Tractor lor DWP 210 99 

26-1447 Bi Oirectional Traclor lor Daisywheel II 188 

261448 Single Bm Sheei Feeder Icy Daisywneel II 672 

26-1455 Acouslic Cover 339 

26-1459 Bi-Oirectional Tractor lor DWP-410 204 

76-1401 Model 1/3/4/4P Pnnter Cacaa 29 

26-1408 RS 232C Caole 16 

26-1409 Model 100 Pruier Cable 13 

26-4401 Model 2/12/16/2000 Prnler Cable 29 

26-1490 10' RS-232C Carole .. .. 25 

261491 25 RS-232C Cable 33 

26 1492 50 RS237C Cable 46 

261493 100 RS232C Cable 76 

2*1495 RS-232C Cable Extender 25 

26 1496 RS-232C Nun Modem Adapler 25 

26-1498 SW -307 Parallel Pnnter Swnch 102 

26-1499 SW-303 RS 232C Seleclor Swnch 128 

26-3505 PC 1 Pnnter 108 

26-3591 PC 3 Pnnter 102 

263605 PC 2 Pnnier .' 89 

26-3652 PC 4 Pnnter 68 



C.ITOH 



8510BP1 I20cps frictcn/T'actOr Parallel 

8510SP Mot Dot. iSOcps Real Fast 

8S10SCP Cokx High Speed prmte* 

1550P Prowriter 2 120CPS for W<»e Pape* Parallel 

1SS0SP Hot Dot iSOcps Real Fast & vv.de 

F1040 Starwnter 40cps Daisywheel 

FiO 55 Pmtmaster. 55cps Daisywhee* FAST 

FiO Bi-Oirectionai Tractor with Plasty Cover 

FiO Electric Single B»n Sneet Feeder msi Regu-red 

FiO Mechanic* Smgie &n Sneet Feeder 

GxiOO Gor«a Banana 50cps 



CABLES 



we manufacture a great number oi different cable assemblies 
10 connect most anything to anything else Cal us with your 
specific needs We probably have <t on the shelf Ai at discount 



SUPPLIES 



5 25 SSOD 0.s*>eiies Pack o' 10 1 Yea* Guarantee 

5 25 DSOO Diskettes Pack oi 10 1 Year Guarantee 

6 SSDO Diskettes Pack of 10. 1 Year Guarantee 
8 DSDD 0«s*ettes. Pack of 10 i Year Guarantee 
5 25 Fkpsort Molds 75 Disks 

8 Fhpson Holds 50 Disks 
8 5 x 1 1 Tractor Paper 20.0 2900 Sheets 
Paper 20lb 2900 Sheets 



5 25 or 8 



l Cleaning I 

RIBBONS 



MONTEZUMA'S REVENGE 

GREEN or AMBER MONITORS 

MoxJemize your tired otd Moo© l with a snappy new 
12 high -resolution video monitor with your choice of 
a Anti-Glare slow decay green or medium decay 
European Amber screen Made with Lead/Strontium 
mpregnated frosted glass GUESS WHATII The CRT 
from this monitor also fits the Mode* 2. 3. and 4 and 
is brighter than the the more expensive Langtey- 
St Clair replacement CRT Just take the tube out o' 
the new monitor and replace your existing CRT Then 
install your old B&W CRT into the new monitor and 
end up with a monitor you can keep or se> Why spend 
all that money for just a new tube Guaranteed for a 
full year Model i cable available on request at no 
charge 

MONTE's SPECIAL PRICE $ 79 



SOFTWARE 



NCW! CP/M 2.2 by Montezuma Micro For The Model 

Rated best by actual lest Get the good one ! 

NEWI Hard Disk Dnver with Backup 4 Restore 

26-0310 TRSDOS 2 3 for The Model l 

264312 TRSOOS 1 3 For The Model 3 

26-0313 TRSOOS 6 x For the Model 4 

26-0315 TRSOOS 6 2 UWrty Oak 

26-0316 TRSOOS 6 2 Disk Doc Rel Card 

26-0413 NEWIOnk Dnve Analyzer Why pay more'' 

26- 1507 Model 1/3 Stockpak 

26-1510 Model 1/3 Trenden 

261511 NEWI Model 3 Home Accountant 

26-1512 Model 4 Target PlannerCalc 

26-1513 NEWI Model 1/3 Cass Spectacmator 

26-1514 NEWI Model 3 Porttolio Manager 

26-1515 pis Me lor Model 3 

26-1516 pis report tor Model 3 

26-1517 pis report lor Model 4 

2*1518 pis He lor Model 4 

261520 Model 4 VisCaK 

26-1521 Model 3 VisiCalc Business Forecast 

26-1527 NEWI Model 3/4 Formanon 

26-1530 Model 4 Mulliplan 

26-1538 NEWI Model 4 Apartmeni Management 

26 1539 NEWI Model 3/4 W-2 Writer 

26-1540 Model 3/4 General Ledger 

261541 Model 3/4 Accounts Receivable 

26-1542 Model 3/4 Accounts Payable 

26-1543 Model 3/4 Payroi 

26-1544 NEWI Model 3/4 Invoice Writer 

26-1545 NEWI Model 3/4 Inventory Control 

26-1554 Model 1/3 Accounts Payable 

26-1558 Model 1/3 Business Ma*ng List 

261559 Model 1/3 Manulacturmg Inventory Control 

26-1560 Fixed Assets 

26-1562 Moo* 1/3 ProUe 

26 1563 Model 1/3 SCRIPSIT 

26-1564 Model 1/3 Mailgram 

26-1565 Model 1/3 Microfile 

26-1568 Model 1/3 Meckcal Office Systems 

26-1569 Model 3 VoiCaic. Enhanced Version 

26-1577 Model 1/3 Surveying 

26-1579 Model 1/3 Real Estate 

26-1580 Model 1/3 Project Manager 

26-1581 Model 1/3 Personnel Manager 

26-1582 Model 1/3 Time Manager 

26-1584 Model 3 Checkwnter 80 

26 1585 Model 3 Business Checkwriter 

26-1588 Model 1/3 Videotex Plus 

26-1589 Model 3 MICRO/Couner 

26-1590 Model 1/3 SuperSCRIPSlT 

26-1591 Model 1/3 Scripsit Dictionary 

26-1592 Model 3 ProHe Plus 

26-1593 Model 3 Profile Plus LDOS/MD Version 

26-1594 Model 3 Desktoct/Plan-80 

26-1595 SuperSCRIPSlT For The Model 4 

26- 1596 SCRIPSIT For The Model 4 

26-1597 Model 3 Business Graphics Pak 

26-1598 Model 4 Videotex Pius 

26-1600 Dictionary lor the Model 4 

26-1630 NEWI TK' Solver lor me Model 4 

26-1635 NEWI Model 4 Profile 

26-1922 Model 3/4 Orchestra 90 

26-201 1 Model 1/3 EDAS. Tape Version 

26-2012 3/4 Assembly Language Development Course 

26-2013 EDAS. ask Version. Model 1/3 

26-2015 Model 3 Instruction Tapes 

26-2017 Model 3 Assembly Language Course. Tape 

26-2018 Model 3 Assembly Language Course Disk 

26-2019 NEWI TRSDOS 6x Traimng Course 

26-2022 Power Tool lor the Model 1/3 

26 2023 Dot Plot lor the Model 1/3 



26 2190 Model 4 COBOL 161 

262200 Model 3 FORTRAN & 

262201 Model 1 FORTRAN 8! 
26-2203 Model 1/3 COBOL 16- 
262204 Model 1/3 Compiler BASIC i2i 
26 2205 fvkcro PILOT 3- 

262210 Model 3 BASCOM 16! 

262211 Model 3 Alcor PASCAL 21 
26-2212 Alcor PASCAL For The Model 4 21 
262213 Model I LOOS ILSi verswnl 6 1 
26 2214 Model 3 LDOS (LSI version! 61 
26-2216 CP/M Plus For The Model 4 121 
26 GOOD The Good CP/M lor the Model 4(Monterumal 19 1 
26-REAL GOOO Hard Disk Driver lor MM CP/M 31 
26 2217 CBASIC For The Model 4 (Requires CP/M| 8: 
262218 BASCOM lor the Model 4 16: 
26 2219 NEWI FORTRAN lor the Model 4 ft 
262220-23 Videotex 2 
26 2224 Compuserv/Oow Jones Signup Kit I 
26 2230 NEWI Model 4 C Language 21 
26-2231 NEWI Model 4 Double Duty (128K req I 5' 
26 2619 Model 3 Corpian 4: 
26 2718 Model 3 PILOT 10 
26-2721 Color Computer LOGO Disk t 
26 2722 Cokx Computer LOGO ROM Pack 4 
26-3030 OS 9 For The Color Computer 5 
26-3036 BASIC 09 For The Color Computer ft 
26 3038 NEWI C Compiler lor the Color Compuler 8 
26 3821 Model 100 Learning Lab 2 
26-3829 NEWI Model 100 Mulliplan 12 
26-3830 Model 100 Scnpsil 3 

ALL Color Computer GAMES 25% OFF Catalog Price 

ALL PCIVDSI SOFTWARE 30% OFF Catalog Pnce 

26-4501 General Ledger ( 16' 

26-4502 mveniory Management System i 16 

264503 Payroll 33 

264504 Accounts Receivable 25 
26-4505 Accounts Payable 25 
26-4507 Matng List II 10 
264508 Medical Oftce Systems 63 
26 4509 Manulacturmg Inventory Control 63 
264510 Versatile 5 
26-4511 VisiCalc 25 
26-4512 ProHe II 15 
26-4513 Job Costing 12 
26-4614 Order Entry 16 
26-4515 ProHe ll Plus 25 
26-4516 Pro!4e Training Guide 5 
26-4517 Profae PVis upgrade 10 
264520 Time Accounting 42 
26-4521 Enhanced VisiCalc 25 
26-4526 VisiCalc Business Forcaswig S 
26-4531 SCRIPSIT 2 33 
26-4532 SCRIPSIT Lrlety Disk 10 
26-4534 SCRIPSIT Dictionary 16 
26-4536 SCRIPSIT Plotter Dnver 4 
26-4540 Statistical Analysis S 
26-4545 Litigation Support 25 
264550 Business Graphics Analysis Pak 21 
26-4554 Accounts Receivable 4 
26-4555 Menu Generator 3 
26-4556 ProHe Forms 10 
26-4557 ProHe Archive 4 
26 4558 Profile Prosori i? 
26-4559 Prowok 16 
26-4560 WESTLAW 21 
2&4560 MuriiPlan Model 2/12 21 
26-4601 General Ledger 33 
26-4602 Inventory Control System 26 
26-4603 Payroi 42 
26-4604 Accounts Receivable 33 
26-4605 Accounts Payable 33 
26-4607 Order Enlry/ICS 33 
26-4608 Sales Analysis 21 
26 4612 NEW! Query COBOL 12 
26-4620 NEWI Precedent 67 
26-4621 Personnel Search 25 
26-4701 FORTRAN 25 
264702 EDAS 16 
26-4703 COBOL 25 
26-4705 Compter BASIC 16 
26-4707 COBOL Generalcr 59 
26-4710 Program Editor fi 
26 4711 NEWI PASCAL MT 36 
26-4712 Assembly Language Development System 21 
26 4713 EDAS 1 4 
26-4721 Videotex For The Model 2/12/16 4 
26^4725 NEWI BASCOM BASIC Compaer 16 
264740 CP/M Plus 21 
26^742 CBASIC 8 
26-4802 Inventory lor the Hard Disk 33 
26-4831 SCRIPSIT lor the Hard Disk 33 
26 4834 Dictionary lor me Hard Disk 16 
26-4835 SCRIPSIT for Thmane Dnves 33 

ALL NEW MOOEL 2000 GOODIES 

26-5210 NEWI General Ledger 42 

2*5212 NEWI Accounts Payable 42 

26 5213 NEWI Accounts Receivable 42 

26-5214 NEWI Inventory Contro jfSier-' 42 

2*5215 NEWI Order Entry 42 

26 521 7 NEWI Purchase Order 33 

26 5218 NEWI Payroll 42 

26-5251 NEWI BASCOM 25 

26 5252 NEWI MS-DOS Assemble 8 

26 5255 NEWI FORTRAN 29 

26 5256 NEWI PASCAL 25 

26-5257 NEW! COBOL 50 

26 5260 NEWI Videotex Plus 4 

2&5261 NEWlSofterm 16 

265276 NEWI Graphwnter 33 

26-5278 NEWI DR Graph 16 

2*5279 NEWIDR Draw 25 

26 5300 NEWI Lotus 1-1-3 42 

26-5301 NEWI Ovation Raong Software 67 

26-5302 NEWI SuperCaK 3 33 

26 5305 NEWI pis 1*9 11 

26 5306 NEWI pis report 10 

26-5307 NEWI pfs graph 11 

26-5309 NEWI pfs wnte 11 

26-5311 NEWI Multipian 16 

26-5314 NEWI Microsoft Word 31 

2*5330 NEWI Mutilate 21 

2*5340 NEWI Home Accountant 10 

2*5352 NEWldBASE 11 42 

2*5376 NEWIWitnes5 4 

265377 NEWIPUnetlal t 

MOOEL 12 1 16 68O00 SOFTWARE 

26-6100 COBOL Development System 25 

2*6201 General Ledger 50 

26-6203 Payroi 59 

26-6204 Accounts Recemable 50 

26-6205 Accounts Payable 50 

26-6207 Order Entry/lCS 50 

2*6208 Sales Analysis 33 

2*6209 Job Cosnng 10 

2*6302 Inventory 33 

2*6309 Manufacturing ICS 72 

2*6401 XENIX Development System 63 

26-6412 Profle for XENIX 42 

2*6415 Unity 63 

2*6431 Scnpsil tor XENIX 42 

26-6450 MAC 16 Macro Assembler 33 

26-6451 RM/FORTRAN lor Xenix 59 

26 6452 NEWI PASCAL lor XENIX 59 

2*6455 COBOL lor XENIX 59 

2*6457 MBAS1C for XENIX 25 

2*6480 MUtiplan. Model 16 & XENIX 29 



Eleclnc Pencil 2.0 Model 
Blue Pencil Model 1/3 
Red Pencil Model 1/3 
Modem 80 A Powertul C 
Trackcess lor me Model 3 
Super UWrty Phis 3 2 Runs 



- Program *, 
* original copy progri 
Model 1/3/4 



CP/M OPERATING SYSTEMS 

CP/M 2 2 tor the Model 4 Th« VERY BEST ONE $169 
Our Very Own Tnck Hard Osk Driver 

Puis Radio Shack s *» The Shaoe 30 

P ft T CP/M 2 2m Floppy Vers-Jn Mod* ?.I2/16 160 
P * T CP/M 2 2n> lor R>S Hard Disk Model. 2/12116 ??5 

BOOKS and MANUALS 

26 2102 Model l Level 11 Manual $5 

26 21 10 Model 4 Techn*:al Manual ?! 

26 2111 Model 3 DOS Manual 6 

26 2H2 Model 3 BASIC instruction Manual 5 

26-2114 Sourcebook New Edition 6 

26-2115 Newsietler Book 1980 4 

2*2117 Model 4 OOS Manual 15 

2*2240 Newsletter Book 1981 fl 

26 2241 Newsietler Book 1982 II 

2*3191 Color Computer Manual 5 

2*3192 Extended Cokx Computer Manual 5 

26-3193 Color Computer 1 Tecrwcal Manual n 

26-3810 Model 100 Teohncal Manual 8 

26 3819 NEW! Model 100 Book d, iu.« * i«. 13 

2*4920 Model 2 Operators Manual 26 

26-4921 Model 2 Technical Reference Manual 26 

26 4922 Model 12 Operalog Manual 59 

26-5403 Model 2000 Programmers Manual 17 

26 5404 Model 2000 Hardware Manual 17 

26-6040 Model 16 Operators Manual 64 

26-6041 Model 16B Operating Manual 72 

62-2084 TRS-80 Pockel BASIC Handbook 6 

TRS-80 Disk & Other Mysteries r* h r. p^^w 18 

Merosofi BASIC Decoded t~ j»-« r^>« 24 

BASIC Easier & Belter o, i.-, .. „.-^ 24 

BASIC Faster & Belter Demonstration Disk 15 

BASIC Faster & Better Library Disk 15 

BASIC Disk I/O Faster 8 Better r» ,~. no— .«». 24 

8ASIC Disk I/O Demonstration Disk 24 

The Cusiom TRS-80 o, c™» B»f». mw 24 

TRSOOS 2 3 Decoded a, j.-»> i* r„„„ 24 

Machine Language Disk I/O », <mi ***** 24 

How Do It On fhe TRS 80 t, w^~. e»«" , 24 

TRS-80 Beginners Guide 13 

Inside Super Uf*1y Plus 3 ~ .™«", w»i IE 



UPGRADES 



.'k. 



I6K RAM 200 nsec 1 Full Year Guar 

64K RAM 200 nsec 1 Ful Year Guarantee 64 

Model 4 128K RAM Upgrade Kil with Genuine PAL 74 

S-112S Model 3 Hi Resolution Graprtcs Board 165 

HI 26 Model 4 H. Resolution Graphics Board 225 

i-1127 Model 4 Drive Kil 444 

Same as above except our brand Save (SSS 369 

Famous AEROCOMP DOC Double Density Controller 99 

1 1 145 Model l RS232 Board with cable 89 

Model 3/4 RS23? Installation Kit less cable 69 

Model 3 Onve Kit 444 

Same as above except our brand Save SSSS 



Radio Snack 40 Track Disk Onve 
Same as above except 40 track Tanoon Save $$S 
MOOEL 4 5Mht Speedup Mod 

HOLMES Model 1/3 4Mto Speedup Moo 

HOLMES Model 3 VID-80 COmpleie with I12K RAM O 

with unities and 80 x 24 video Save SSSS 

26 3013 16k RAM For MC-10 Color Compuler 

2*4104 Model 2 Hi-Resokilion Graphics Board 

26-4105 64K RAM Board 

26-4167 8 Skmhne Double-Side Dnve 

2*5125 Model 2000 10Mb Hard Disk Kn 

26 5140 Model 2000 Hi Resolution Graphics Board 

26-5141 Model 2000 Color Graphic Che Sel 

26-5144 Model 2000 Mouse/Clock Board 

2*5160 Model 2000 Internal I28K Board 

2*5161 Model 2000 External I28K Boaro 

26-5162 Model 2000 128K RAM lor 26-5161 

26 5164 NEWI Model 2000 Serial Board 

2*6010 Model 2 or 12 to Model 16 68000 Kn 

2*6011 Model 16 128K RAM Board 

26-6012 Model 12 128K RAM Kil 

2*6013 Model 16 3-User RS-232 Card 

26-6017 Model 12 Card Cage 



We 



i extensively equipped service lac*ty * 
ol parts G-ve us a cal lor that hard-to ("id 
nd provide what you need 



BUY FROMJJS RIGHT NOW! 

Our memory is so large tt can not be listed completely 
Please cal A you do not see what you want Chances are 
we have w Because of the time lag *. maga?me advertising 
pnees are subject to change without notice and are mail order 
only We are not responsible tor typogrpbical errors Your 
company and/or personal o*»ecks are welcome and w* not 
delay your order We use TeleCheck Please observe the 
tolowwx) requirements and your order will be shipped without 
delay The chec* must be drawn on a USA or Canadian bank 
and payable m US Dollars It must be a bank printed check 
and contain your street address and telephone number The 
signature must EXACTLY match the name printed on the 
check Thats all there is to it In addition we accept American 
Express, Mastercard. Visa Cashier s Checks Wire Transfer 
and we also ship COO COD s and motor freight shipments 
may requre a deposit Some special items require deposits 
ALL COO s require cash or cashiers check on delivery 
Company aod/or personal checks can NOT be accepted m 
payment of COD shipments Credit cards are not charged 
until we sh<) your order SHIPPING CHARGES ARE NOT 
INCLUDED. Please add $5 handkng to an orders totaling less 
than $50 Add $20 handhng charge to an orders over $500 
shipped to Canadian addresses No State Sales Tax 
collected on out-of-state shipments If you order by 5PM your 
order w« be shipped the NEXT DAY it stock is on hand 
Respons.b*ty of suitability of software rests with the 
purchaser Due to the nature of this business there are NO 
REFUNOS ON SOFTWARE, REPLACEMENTS WILL BE 
PflOVIDED FOR DEFECTIVE SOFTWARE ITEMS, provided 
we are notified wthm ten days of delivery of the 
merchaodise if you have a particular problem please can us 
for help and instructions 

WARRANTY 

All items carry the original manufacturers warranty We w.n 
be happy to mail you a copy upon request 

CALL rOit FREE FROM ANYWHERE IN THE USA 

800-527-0347 
800-442-1310 



"0- 
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Mac 
Inker 

Re-ink any fabric ribbon 
AUTOMATICALLY for less 
than If, Extremely simple 
operation with built-in 
electric motor. We have a 
MAC INKER for any printer: 
cartridge/spool / harmonica / 
zip pack. Lubricant ink safe 
for dot matrix printheads. 
Multicolored inks, uninked 
cartridges available. Ask for 
brochure. Thousands of 
satisfied customers. 

$ 54. 95 




Mac 

Switch 

Mac Switch lets you share 
your computer with any two 
peripherals (serial or 
parallel). Ideal for word 
processors— never type an 
address twice. Ask us for 
brochure with tips on how to 
share two peripherals (or two 
computers) with MAC 
SWITCH. Total satisfaction or 
full refund. 

$ 99. 00 



■■*—« «,. 



^Ssr** 



«r 






Order toll free 1-800-547-3303 

Ci-mputer 
Friends 

6415 SW Canyon Court 
Suite *10 

Portland, Oregon 97221 
(503) 297-2321 



►^357 
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Listing 1 continued 












02800 LOOP4 


LD 


A,(HL) 1 


GET CHARACTER 






02810 


CP 


'•' * 


'#'? 






02820 


JR 


Z, MATCH 1 1 


IF SO THEN MATCH1 






02830 LOOP5 


INC 


HL 1 


NEXT CHARACTER 






02840 


CALL 


INCDE t 


INCREMENT VIDEO POINTER 






02850 


JR 


LOOP4 » 


AND CONTINUE 






02 860 MATCH1 


LD 


A,(DE) I 


GET INPUT CHARACTER 






02870 


CP 


B t 


CP BACKGROUND 






02880 


JR 


NZ.CONT5 » 


IF NOT THEN CONT5 






02890 


LD 


A,20H I 


ELSE A=SPACE 






02901 


LD 


(DE) ,A 1 


DISPLAY SPACE 






02910 CONT5 


LD 


(IY),A » 


STORE INPUT CHARACTER IN INPU 






T BUFFER 












02920 


INC 


IY 1 


INCREMENT BUFFER POINTER 






02930 


DEC 


C 1 


DECREMENT COUNTER 






02940 


JR 


NZ.LOOP5 I 


LOOP UNTIL DONE 






• 2950 


LD 


HL.POOLAD 1 


RESTORE TEMPORARY STRING 






02960 


LD 


(POOL) ,HL I 


STORAGE POINTER 






02970 


LD 


(IY),0 J 


MARK END OF INPUT 






02980 


LD 


HL,(PTR) I 


GET POINTER TO POSITION IN PR 






OGRAM 












02990 


POP 


AF 1 


CLEAR STACK 






03000 


CALL 


VARPTR 1 


FIND VARPTR 






03010 


CALL 


TEST J 


IF NOT STRING THEN FC ERROR 






03020 


PUSH 


HL ; 


STORE POINTERS 






03030 


PUSH 


DE 








03040 


LD 


HL,(KEYBUF) | 


GET BUFFER LOCATION 






03050 


DEC 


HL 1 


POINT TO BUFFER-1 






03060 


LD 


B,0 J 


B-0 






03070 


CALL 


2 86 8H ; 


LET THE ROM HANDLE THE REST 






03080 


POP 


HL 








03090 


XOR 


A 








03100 


JP 


1F33H 








03110 TEMP 


DEFW 











03120 LEN 


DEFB 











03130 SCREEN 


DEFW 











03140 KEVIN 


PUSH 


DE 1 


GET CHARACTER FROM KEYBOARD 






03150 


PUSH 


BC 








03160 


PUSH 


HL 








03170 LOOPK 


LD 


HL,(LOC) J 


GET VIDEO LOCATION 






03180 


LD 


A,(HL) j 


GET CURRENT CHARACTER 






03190 


LD 


(TEMP) ,A ; 


STORE IT 






03200 NOFLSH 


LD 


A, (FLAG) 1 


GET FLAG 






03210 


AND 


0C0H ] 


GET BLINK RATE 






03220 


LD 


B,A 


STORE IN B 






03230 


LD 


(HL) ,CURCHR ) 


DISPLAY CURSOR CHARACTER 






03240 LOOPK1 


CALL 


SCAN 


CALL SCAN SUBROUTINE 






03250 


OR 


A 


ZERO? 






03260 


JR 


NZ, KEYRET 


IF NOT THEN KEYRET 






03270 


DJNZ 


LOOPK 1 


ELSE LOOP UNIT B=0 






03280 


LD 


A, (FLAG) 


GET FLAG 






03290 


BIT 


4, A 


CHECK BIT 4 






03300 


JR 


NZ, NOFLSH 


IF SET THEN NO FLASH 






03310 


AND 


0C0H 


ELSE GET BLINK RATE 






03320 


LD 


B,A 


B=DELAY 






03330 


LD 


A, (TEMP) 


GET CHARACTER 






03340 


LD 


(HL) ,A 


AND DISPLAY IT 






03350 LOOPK2 


CALL 


SCAN 


CALL SCAN SUBROUTINE 






03360 


OR 


A 


ZERO? 






03370 


JR 


NZ, KEYRET 


IF NOT THEN KEYRET 






03380 


DJNZ 


LOOPK 2 


LOOP UNTIL B-0 






03390 


JR 


LOOPK 


LOOP 






03400 KEYRET 


POP 


HL 


CLEAR STACK 






03410 


POP 


BC 








03420 


POP 


DE 








03430 


RET 




AND RETURN 






03440 SCAN 


LD 


A, (FLAG) 


GET FLAG 






03450 


AND 


32 


BIT 5 






03460 


LD 


(CAPS) ,A 


LOAD CAPS FLAG WITH A 






03470 


CALL 


KEYSUB 


CALL ROM SCAN 






03480 


OR 


A 


ZERO? 






03490 


RET 


Z 


RET IF NO CHARACTER 






03500 


CP 


8 


BACKSPACE? 






03510 


RET 


Z 


RETURN IF SO 






03520 


CP 


13 


ENTER? 






03530 


RET 


Z 


RETURN IF SO 






03540 


CP 


91 


UP ARROW? 






03550 


RET 


Z 


RETURN IF SO 






03560 


CP 


10 


DOWN ARROW? 






03570 


RET 


Z 


RETURN IF SO 






03580 


CP 


' ■ 


SPACE? 






03 590 


JR 


C,BAD 


IF LESS THEN BAD 






03600 


PUSH 


BC 


STORE BC 






03610 


LD 


B,A 


CHARACTER IN B 






03620 


LD 


A, (FLAG) 


GET FLAG 






03630 


AND 


1 


BIT 






03640 


LD' 


A,B 


A=CHARACTER 






03650 


POP 


BC 


RESTORE BC 






03660 


RET 


Z 


RETURN IF BIT NOT SET 






03670 


CP 


'0' 


ELSE TEST FOR NUMERAL 






03680 


JR 


CBAD 


IF LESS THAN '0' THEN BAD 






036 90 


CP 


•9'+l 


IF GREATER THAN 






03700 


JR 


NC , BAD 


■9' THEN BAD 






03710 


RET 




ELSE RETURN 






03720 BAD 


XOR 


A 


•A=0 

Listing 1 continued 
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Softronlcs Monthly Special 

RETAIL 

R/S Mod 4 64K, 2 Drives ft RS232 $1599 

Epson RX-80 $ 399 

Hayes Smartmodem 300 $ 289 

Paper, Disks, Modem & Printer Cable S 166 

Total Retail $2604 

SCS Special $1595 

When buying a Modal 4, ask them If It's TRUE 100% 
Radio Shack from the factory WITH GREEN SCREEN. 
Some aren't I We sell only 100% Radio Shack with our 
full 90 day warranty. 

Mod 4 64K. 2 0D. RS232 
Mod 4 I28K. 2 DO, RS232 
Mod 4P 64K 4 2 Drives 
Mod 4P 128K & 2 Drives 
Hayes Smartmodem 300 
Hayes Smartmodem 1 200 
Okldata ML-80 
Okldata ML-82A 
Gemini I OX 

Each computer purchase includes SOFTPAC (SI 50 value) FREEi 

SOFTPAC . . Our proven integrated software system for R/S 
computers. Featuring word processor, spreadsheet, database, 
communications & graphics. The only fully integrated package at 
this price with FREE UPDATESI Now only $149,001 

SS/SD SS/DD DS/DD 
Elephant Generic Disks 15.90 17.95 22.95 

Elephant Boxed Disks 17.95 19.95 25.95 

Elephant Diskettes are America's premium disks at a SOFTRONICS 
price. These prices include a lifetime warranty with sleeves, labels & 
hub rings. Free shipping with orders over SI 00. 

SOFTRONICS COMPUTER SYSTEMS „ 116 
2300 E. 14th St., Suite 201 
Tulsa, Oklahoma 74104 
(918)749-6211 

We accept Money Orders Bank Wi'es. Certified & Personal Checks — Personal check orders 
to be processed after bank clearance — Add 3% shipping — Oklahomans add 6% tax — All 
sales ate final — Will ship disks COD— Call for quantity discounts on disks 



$1035 


Okldata ML-83A 


$ 539 


$1095 


Okldata ML-92 (P) 


$ 419 


$1035 


Okldata ML-93 (P) 


$ 679 


$1085 


Epson FX-60 


$ 469 


$ 203 


Epson RX-80 


$ 289 


$ 479 


Epson RX-80FT 


$ 329 


$ 169 


Epson FX-I00 


$ 679 


$ 309 


Epson RX-100 


$ 519 


$ 279 


Epson LQ- 1500 


$1195 



TRS-80 COMPUTERS 

MODEL IV MODEL2000 $2060.00 

64 K $995.00 w/HD 3360.00 

2 DISKS RS 232 COLOR COMPUTER 

MODEL IV P 995.00 64K 182.00 

MODEL 12 2999.00 MODEL 1 00 8K 559.00 

ONE DISK 2339.00 MODEL 10024K 669.00 

DISK DRIVES 

15MEGHD $2099.00 

COLOR DISK 275.00 

COLOR DISK 1 229.00 

PRINTERS 

ALL OKI DATA CALL 

GEMINI 10X 270.00 

GEMINI 15X 380.00 

$ 379.00 
699.00 

1598.00 
459.00 

3135.00 

Langley St. Clair Green and Amber Screen $89.00 

BODEX CORP. 

224 E. MAIN ST. 

MARLBORO, MASS. 01752 

Phone (617) 485-5115 or 481-1029 

TRS-80 Trademark of Tandy Corp. 



DMP-110 


$ 299.00 


DMP-120 


DMP-105 


159.00 


DMP-430 


DMP-500 


1064.00 


DMP-2100 


OMP-420 


680.00 


DWP-210 


DWP-510 


1149.00 


CMP-2150 



^381 




an innovative word processing system 



list price $175 




Mtf #»*« 



through December 

"/ would give Lazy Writer my highest recommendation. 
This is a word processor with sufficient flexibility for any 
task you care to throw its way, and with sufficient ease of 
use for virtually any environment. Lazy Writer is one of 
the good ones." 

Stew Schneider On-Line Today June 1984 

Lazy Writer was the first system word processor. Since 
its introduction in 1980, it has been enhanced, updated, 
polished and extended. It is a family of programs for the 
business and professional user. Lazy Writer gives you: 

■ fast, easy, one- key editing 

■ 10 user programmable keys store keystrokes 

■ load and edit any file, even BASIC saved as ASCII, 
and files created by other programs 

■ printer codes in text can activate any printer 
function 

■ built-in communications 

■ a formatter to preview page breaks and give word 
count 

■ multi-line header/ footers 

■ load extension programs without leaving the word 
processor 

Model I and III come on a mini DOS, but can be 
transferred to any Model III DOS. An install program 
does the work for you. Model 4 version has 80 x 24 
screen; use it with any Model III DOS or TRSDOS 6. 
Versions also available for Holmes VID-80 and Lobo 
MAX-80 

AlphaBit Communications, Inc. 

13349 Michigan Ave 

Dearborn, Michigan 48126 Can Now 

S (313)581-2896 



MOVisa 
accepted 

^476 



.- See List ol Advertisers on Page 1 76 



80 Micro, November 1984 • 119 



_____^_ . . . . .. 




































r 


















^ 


















"O 








a 








oi o> 
c c 

-H -H 


>1 







co a 
U E-. 


Q 
















44 u 

a a 


E-i 


•O 
■u 




















o ea 


■ 


a tj 




.8 


















U 


0) 


■ -U C 




















*t 


3 


• *> 3 a 




* 


















+J <o 


rH 


^ c a 




rH OS 


















3 E 


10 


>,-* c a 




CO OS 


















Q. u 


> 


r-t M -H 3 




















c o 




c a 




£ OS 


















•H l|-l 


o> 


•) * 




D W 
















«««««« 




<0 


a> £ qj 




q 
















«««««« 


T3 0) 


■-H 


I0£ -U O 




w z 
















* * 


ai x: 


•44 


u 4-1 <a 




OS 














jj 


* * 


JJ ±J 




41 O. 


















5 


* "O 0) * 


■U 


ai 


4-1 c cm 




- u 














^ 


* C u * 


<d c 


x: 


O -H O -* 




w 










K 




1 


« cao « 


E h 


j-> 


10 -HO 




■ J 










OS 




« O *M * 


S 




u a* *• <o 




* u 










s 




« -H * 


o a> 


c 


a a a a 




H 










u 




E 


* 44 N XI « 


>w a 


•« 


4= >i 




523 












* 10 -H * 


>i 




O 44 O 01 
















* U (0 0) * 


a> 4-> 


■ a> 


•-* x: 




rH Eh rH 














1 

1 


* *J Oi * 


£ 


• a. 


on 44 




Cfl 














* 01 >1<0 * 


*> - 


- >i 


C U 44 




p * W 
Eh» £ 














« C U 3 « 


(0 


m u 


a « £ 
















* O O CT> * 


VM VI 


<* 


U O 4J 




O Eh 3 














* E e c « 


O «J 


<► CO 


O Q. 44 r4 </> 




O Z CO 














* ai a> «3 « 


01 


4» U 


a c » < 




M U 














5 


* Q B -H •* 


c a 


i a 


E « -H •« 




•• « OS 














* e * 


o a. 


4k Qj 


3 U U 1 1 




Oi 
















* 44 OJ HI cO * 


•H 10 


— a 


E- Q. C • H 




o> •• 














N 


* dx: c u« 


*J 


«• a 


•H C^ OJ >, < 




oa z 














00 


* Qi-W -H CT>* 


10 - 


<o 


X H « E Ois £ 




■ U ■ 














•5 


* C jC O * 


u r* 




(0 < £ -H JM ■ K 




II '44 














1 


« HUU Ut 


.u Eh 


«• - 


E 4-) 14 b 


1 1 


v>Eh 














« a> n> cl« 


w < 


» r« 


H 01 A Cu 


1 <» 1 


CQ * 










d V 10 to 




* "o to E * 


C £ 


«*o 


-z a> a os •• « 


1 O 1 


■ a O 










1 1 1 1 




c 


* 01 10 * 


O OS 


-3 


>,m C X U E-t 


1 •« 1 


Eh a z 










nnnnA 




5 


« 4-> O 01 -- ' ■* 


E O 


rHBJ -H U E<»D O. 


1 «>■ 1 


ZrH U 










HHhtfhP 
I oq u u u u 




1 


* 4J 4J.C .C * 


OJ fa. 


U Cu 


CO. M Z*A b 


1 < 1 


H 1 « 












« 10 JJ 4J * 


<SJ T3 - 


z- 


0- aai u*z 


1 O 1 


os u 1 










sss«»nnuuin 




« a m * 


to a> 


o 


.44 • V «* M C 


1 z 1 


0. Eh 














* C a> ai o>* 


4h o c 


s c 


(0 c - C "O » H 


1 M | 


fa. Z 
















* oxiu c* 


o oi 


Ok V 


•h 01 a v oi oi ■ •• fa. < 


1 (0 1 


••MM 
















* cu e a -h * 


O OJ .C 


- Xi 


« Xi » -P J3 1 - 
us eo u 3 *!</>■ •»» H 


1 3 1 


06 










dy%3 






« o> u c* 


.. eh -h a 


2 


1 - 1 


Eh •• O. 










!-[i.klKlK33333Q 






* s oi c* 


a m in 


D> 


0) - 01 < -0 z 


1 h 1 


Z 










UUUUUOOOCCZ 

aQQQQlilUUWUlil 






« a> x d * 


C 


£ 44 e 0) X3 T < M 

3 >i«-l CD X c •• a J CC 


1 - 1 


M rH Z 














« a: ai u* 


IS -H 


-H 


1 < 1 


« + M 
















« « 


SCC£ 


01 


c 1 k<-h >o r-tucu 


1 Ox 1 


O. <N £C 








1 


o 






« * 


HOfH 


3 


— ■ «H* * » a <w ■ » 


1 9V | 


..> H 












« * 


QS« • 


■ ■ 


» ■ c» Eh4JH» HwHHH 


1 Eh 1 








5 


u ■-• K K U 14 






«««««« 


OS OS E- C< 

< u z z 


HH 


H E-i O E-. Z C Z -Z00ZDO 


1 [4 1 


OS rH 








c 


Jt-iQHNQQOi-i 






«««««* 


ZZ 


ZZ-^ZMOIMBJMIMCk.0* 


1 Cu 1 


is w s 








o 








U M M 


M M 


mi-iPMOSBKSKkCKZZ 


1 Z 1 


II < H 








^ 






£££££££iJ2;ttQS 


a «« 


« CC 10 OS Ph 0> O.OO.O.CUHH- 


- M - ■ 


Eh CO II 








°c 


&9S&SSSSSS St 






M U U U U W Cd 


UObCvi 


a. 04- 


ftd. O H 4J U 




U 








I 


(*iTt/)»flr*o>^QrtM(n 






ce a: as as k a: a 


> 


<r 


O BmsusSBSBCN 


in a in r~ a a 








5 

-J 










a a a a w 


as- 


aarHSS4J r-t io<N(*i«#invevowor-r--r>'<»<»<i«. 














h «n pi * m * r» 


rH tN fl •* EH 


m vo 


C-»0O OIH 10 H ^H^rHrHiHiH 


i-t t-i rH rH pH iH M 













T80-FS1 



Simulator 




See your dealer! 



Available for Model I or Model III $25 00 
on cassette or $33.50 on disk (with 
enhancements) All versions require 16K 



If you order direct, please specify whether you have Model I or 
Model III (the media are different) and whether you want disk or 
cassette. Include $1.50 and indicate UPS or first class mail. Illinois 
residents add 5% sales tax. Visa and Mastercard accepted 
If you don't yet own a disk, don't fret. You can upgrade anytime 
Cassette users may send back their cassette (but not the manual) 
along with $10 (first class shipping included) and receive the disk 



LOGIC 

Communications Corp. 
713 Edge brook Drive 
Champaign, I L 61820 
(217)359-8482 *n 
Telex: 206995 
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INTEGRATED SOFTWARE FOR MODEL III & IV 

Quotes from our Product Review in 80 MICRO, Aug 84 



"/ recommend you get your hands on A BSEE before its author, 
David Dahl, realizes how seriously underpriced it is. . . ABSEE 
is an ingenious, thoroughly professional Model III file editor, 
word processor, screen graphics, and telecommunications pro- 
gram. Because of its integrated nature and flexibility, this 
package can do the iob of a halt-dozen individual utilities and 
programs. " 

"If you're a programmer, your editing tasks have /ust become 
much easier " 

"A BSEE is the most fascinating program I have worked with in 
a long, long time. " 

Requires 2 disk drives on Model III or IV (in III Mode) 48 K RAM 
Runs on TRS Dos 1.3 
Others available at extra cost 

ORDER FROM 



COMPUTENTS INC. 

980 JOHN ADAMS PARKWAY 
IDAHO FALLS, ID 83401 
PHONE 208-529-2492 (9-5 Mtn) 



89 



95 



IDAHO RESIDENTS 

ADD SALES TAX 

MASTER CHARGE OR 

VISA WELCOME 

S3" SHIPPING A 

HANDLING CHARGE 

ADD $6~ tor C.O.D. 



(LISP) 

Artificial Intelligence Language 

UO-LISP Programming Environment 

The Powerful Implementation of LISP 

for MICRO COMPUTERS 

Excellent for learning the Preferred Language 
of the Artificial Intelligence Community 

This POWERFUL subset of the CP>M 

based UO-LISP supports, the usual 

LISP Interpreter Functions, 

Data Types. LISP Structure Editor. 

Optimising LISP Source Code 

Compiler & Assembler. Assembly & 

LISP Code Intermixing. Compiled 

Code Library Loader, Numerous Utility 

Packages. Comprehensive 150 Page 

Manual, the High Level language 

RLISP, and much more. 

SPECIAL LIMITED OFFER 

Turn your TRS-80 into a real LISP machine 
for only $49.95 

Not included in the above special limited offer is the powerful LISP 
TOOL META the translator writing system. 
UO-LISP is available on TRS 80 Model I & III w.th 48K TRSDOS 
and dual drives, as well as most CP/M based machines. 
TO ORDER: Send request for UO-LISP Model I or Model III with check, 
money order, or credit card number VISA and Mastercard Please include 
expiration date and Card No. 
Write for your FREE catalog of UO-LISP products 

Northwest Computer Algorithms 

P.O. Box 90995, Long Beach, CA 90809 

(213) 426-1893 - 95 
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Multi-Basic 

"The BASIC compiler that compiles 
both MBASIC and CBASIC" ^215 



Now you don't have to give up the features you 
like about MBASIC to obtain the powerful 
capabilities of CBASIC. Multi-Basic gives you 
both. 

Multi-Basic works with your existing programs 
so your current software investment is protec- 
ted. But just as important, Multi-Basic opens 
the door to a whole new way of programming. 
With Multi-Basic you can write very readable, 
modularand structured programs. Multi-Basic 
makes program maintenance as easy as it is 
with Pascal. 

In addition to understanding the two most 
popular dialects of BASIC, Multi-Basic allows 
you to extend the language even further You 
can add your own statements and functions as 
needed. 

Multi-Basic is also compatible with our Pascal 
and C compilers. This allows your BASIC 
programs to use routines written in Pascal or 
C 

In today's fast changing computer business, 
you need a language as versatile as Multi- 
Basic. Invest a little time today and save a lot of 
time tomorrow. You owe it to yourself to see 
what a difference Multi-Basic can make. 

Multi-Basic is available for the TRS80 models 
I, II, III, 4 and 12; Tandy 2000, IBM PC, and 
CP/M. It is compatible with TRSDOS, LDOS, 
NEWDOS, DOSPLUS. MSDOS, PCDOS, CP/M 
and CP/M plus. 

Alcor Multi-Basic $139 
Other Products: 

Advanced Development Package $ 69 

Blaise I Text Editor (Mod 1 or 3) $ 49 

Blaise II Text Editor (all others) $ 79 

Multiprocessor Assembler $ 69 

Alcor C $139 
Alcor Pascal 

(for CP/M. MSDOS, PCDOS) $139 

Complete Development System $250 

includes compiler, text editor and advanced 
development package 

Shipping U.S.A. $6.00 

Shipping Overseas $28.00 



13534 Preston Road. Suite 365 
Dallas, Texas 75240 

•:■■■■:■ —.WKk^m (214)494-1316 

Multi-Basic is a trademark of Alcor Systems 
TRS80 is a registered trademark ot Tandy Corporation 
CP'M CBASIC are trademarks of Digital Research 
MSDOS, MBASIC are trademarks of Microsoft 



DISPLAYED VIDEO IS DRIVING DOWN 
PRICES ON DISKS! 



FREE SHIPPING! 





TEC'S NEW HALF-HIGH 40 TRACK DISK DRIVE W/CASE 



^ & POWER SUPPLY AT AN INCREDIBLE LOW PRICE! ^ 

$$& $179.00!!!! °*%% 



TANDON 40 TRACK TM-100-1 W/CASE & POWER SUPPLY $199.00 

"YOU CAN BUY THE REST BUT WHY NOT BUY ONE OF THE BEST!" _ M 

TEACs NEW SLIMLINE 40 TRACK W/CASE & POWER SUPPLY $205.00 

TEAC NEW SLIMLINE DOUBLE SIDED 40 TRACK W/CASE & POWER SUPPLY $240.00 

TEAC NEW SLIMLINE DOUBLE SIDED 80 TRACK W/CASE & POWER SUPPLY $285.00 

DUAL VERTICAL CASE & POWER SUPPLY TO ACCOMMODATE TWO SLIMLINE DRIVES. 
$10.00 ADDITIONAL WITH SINGLE DRIVE PURCHASE 

DVS COLOR COMPUTER 1st DRIVE ONLY $329.00 

TWO DRIVE 5V4" CABLE (FOR MOST COMPUTERS) $23.99 WITH GOLD PLATED CONNECTORS 

MODEL 1 DOUBLE DENSITY BOARD $85.00 

SANYO COMPUTERS 

MBC550-128K. 16BIT. ONE 160K DRIVE $779.00 MBC555 - 128K, 16BIT. TWO 160K DRIVES $999.00 

MBC550-128K. 16BIT, ONE 320K DRIVE $849.00 MBC555 - 128K. 16BIT. TWO 320K DRIVES $1299.00 

550 SYSTEMS - INCLUDE. MSDOS. WORDSTAR. CALCSTAR. & EASY WRITER SOFTWARE PACKAGES 
555 SYSTEMS - INCLUDE: MSDOS, WORDSTAR. CALCSTAR. EASYWRITER. SPELLSTAR. MAILMERGE. & 

INFOSTAR SOFTWARE PACKAGES 

COMREX AMBER MONITOR 9" $89.00 

HAYES SMART MODEM 300 BAUD $210.00 1200 BAUD $485.00 

ONE YEAR WARRANTY ON TEAC DRIVES/ 180 DAYS ON TEC & TANDON 



PRINTER PRICES 



< 



WERE NOT GOING TO MAKE YOU CALL FOR PRICES - HERE THEY ARE IN BLACK AND WHITE!!! 



EPSON 

RX80 W/GRARHTRAX PLUS $275.00 

RX80 FT W/GRAPHTRAX PLUS $349.00 

RX100 W/GRAPHTRAX PLUS $495.00 

FX80 W/GRAPHTRAX PLUS $495.00 

FX100 W/GRAPHTRAX PLUS $699.00 

LQ1500 200 CPS COMING SOON 
1 YEAR WARRANTY ON EPSON PRINTERS 



PR5000 DAISYWHEEL 15 CPS $395.00 

PR5500 DAISYWHEEL 20 CPS $595.00 

GEMINI 10X $275.00 

GEMINI 15X $395.00 

CITOH PROWRITER 8510 $355.00 

DWP210 $559.00 

DAISYWHEEL II $1149.00 



PRINTER CABLE 10 LONG W/GOLD PLATED CONNECTORS STARTING ATS25.99 



WE CARRY TRS80 & SANYO COMPUTERS 




D ISPLA YED 

Wo 




IMMEDIATE DELIVERY 

180 Days Parts and Labor Warranty 

DEALER INQUIRIES INVITED 



Visit our two 
retail locations at: 

886 Ecorse Road 

Ypsilanti, MI 48197 

(313) 426-5086/(313)482-4424 

or 

111 Marshall Street TO qrdER: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 

Litchfield, MI 49252 (517) 542-3939 (517) 542-3947 

(517) 542-3280 OR WRITE: DISPLAYED VIDEO 111 MARSHALL ST., LITCHFIELD, MI 49252 

(517) 54Z-o9J9 AUTHORIZED SANYO DISTRIBUTOR "nBm*m tn *m mrii *+mTm+C m r m* tm 

(517) 542"3947 ^62 Prices & Specifications subject lo change without notice 



DISPLAYED VIDEO IS DRIVING DOWN PRICES ON DISKS! 
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NO YOU'RE NOT SEEING THINGS THAT'S 

FOUR INTERNAL DRIVES IN A MODEL 4!!! MODEL 4 PURE 26 1069 

THE STORAGE CAPACITY YOU'VE ALWAYS <*K. RS232. 2/40 TRACK DRIVES 

WANTED. AT INCREDIBLY LOW PRICES!!! $1049.00 

S1449.00/128K $1529.00 9° DAV WARRANTY 

QUALITY BACKED BY DVS YOU CANT 
LOSE WARRANTY! 

DISPLAYED VIDEO HAS DONE IT AGAIN! 

DISPLAYED VIDEO is offering TRS-80 MODEL 4 disk drive systems for INCREDIBLY low prices, quality backed up by DV's six 
month you can't lose warranty. 

DVs MODEL 4 with 64K. four internal 40 track double density disk drives, sound board with TRSDOS 6.0 

PLUG IT IN AND GO . . .$1449.00/ 128K . . .$1529.00 

DVs MODEL 4 with 64K four internal 40 40 track double density, double sided disk drives, sound board with TRSDOS 6.0 

PLUG IT IN AND GO . . $1649.00/ 128K . . .$1729.00 

DVs MODEL 4 with 64K four internal 80, 80 track double density, double sided disk dnves. sound board with TRSDOS 6.0 

PLUG IT IN AND GO . . $1 799.00/ 128K . . .$1879.00 

DVs MODEL 4 with 64K two internal 40/40 track double density, double sided disk drives, sound board with TRSDOS h.O 

PLUG IT IN AND GO . . $1299.00/ 128K . . .$1379.00 

DVs MODEL 4 with 64K two internal 80/80 track double density, double sided disk drives, sound board with TRSDOS 6.0 

PLUG IT IN AND GO . . $1499.00/ 128K . . .$1579.00 

Displayed Video systems have a six month you can't lose warranty 

NEW MODEL 4P (Portable) 26 1080 Pure W/ 2 40 Track Drives $1049.00 

DVs MODEL 4P (Portable) with 40/ 40 Double Sided Disk Drives!. . . $1349.00 128K $1419.00 

The answer to the IBM PC NewTandy2000 $2049.00 

MODEL III 4 Internal Two Drive Kit: Includes controller board, dual drive mounting bracket, dual power supply, all hardware 

cables and connectors (gold plated) & TEC Drive $369.00 4 DRIVE KIT MINUS DRIVE $349.00 

SANYO 550 $779.00 SANYO 550-2 $849.00 

SANYO 555 $999.00 SANYO 555-2 $1299.00 

MODEL 100 8K $525.00) 24K .... :$695.00 DVS MODEL I DOUBLE DENSITY BOARDS . . . $85.00 



Visit our retail location at: 

111 Marshall Street 
Litchfield, MI 49252 
(313) 426-5086 
(313) 482-4424 
(517) 542-3280 
(517) 542-3939 
(517) 542-3947 




WE CARRY TRS8U & SANYO COMPUTERS 
AUTHORIZED SANYO DISTRIBUTOR 



D ISPLAYED 
DEO 




IMMEDIATE DELIVERY 



Authorized Dealership at: 
1 1 1 Marshall Street. Litchfield. Michigan 49252 PI 42 

To Order Call (313) 42b 5086: (313) 482 4424: (517) 542 3280 
(517) 542 3939: (517) 542 3947 
OR WRITE 
Displayed Video, 1 1 1 Marshall St . Litchfield. Ml 49252 IBM '* » *» ! ■ ■■ * of international Bu»inru Machir 

IKS HO is J iradwiidri* <* The Tandy CapOfMOn 1'ntv. suhnvt Ddiangl wiihuul nuntv 



I 



• FREE SHIPPING* 

WITHIN CONTINENTAL 48 STATES 
ON PREPAID CASH ORDERS ONLY 




MICRO IMAGES 

INDUSTRIES INC. 



We've MacIe 
RetaU PmcEs 
ThiNq of Tht 
.PAST. . . 
OrcIer Toll Free 
1-800-225-1182 



THIS IS AN ORDER LINE ONLY! 

DIRECT ALL INQUIRIES AND 

N Y. ORDERS TO 

(212) 445-7124 



DISK SALE! 



NASHUA .vsHtaio 19.95 
Verbatim 23.95 

Maxell- *»<o 23.95 



$84.95 

COPYART II 

MODEL I or III 
SPECIFY PRINTER 




$79.95 
MULTIDOS 

SPECIFY MDL I or III 
SINGLE OR DOUBLE DENSITY 



$139.95 

LAZYWRITER 

MDL I, III or IV 
SEE LAZY OPTIONS BELOW 



ELECTRIC 
WEBSTER 

W/Corr 

$118.95 



DOTWRITER 

4.0 W/Letterset 
;Mdl l/lll S84.95 

iMdIIV S99.95 



INEWSCRIPT 

Ver. 7.1 

$99.95 

W Label - S109 95 



MAXI 

CRAS 74.95 

MGRII 149.95 
STAT 159.95 



LE SCRIPT 

Mdl l/lll or IV 
$108.95 



DATAGRAPH 

Mdl I. Ill or IV 

$69.95 

Pie 0ption-$29.95 



SUPERUTILITY + 

Mdl l/lll Ver. 3.2 

$69.95 

SEE NEW BOOK BELOW 



TALLY 
MASTER 

Mdl I or HI 

$59.95 



OMNITERM 

ov Lindbe'Q Systrmt 

Mdl in '. 

$69.95 



MZAL 

REL III 

$74.95 


DATAWRITER 

NCW VERSION 
SPfCIFY MDl I OR ■ 

$124.95 



DOSPLUS 

Mdl I or III 3.5 84.95 

MdllVA 129.95 

Mdl II 199.95 



PROSOFT UTILITIES 

TRASHMAN Model I or III $34.95 

FASTER Model I or III 26.95 

RPM Model I or I II 21.95 

LAZY OPTIONS 

LAZY FONT (Epson) 44.95 

LAZY MERGE 39.95 

LAZY DOC 49.95 

LAZY Draw. Do. Tab. Calc_. 34.95 

MAIL LIST PROGRAMS 

POWER MAIL PLUSMdl 2/12/16 129.95 

POWER MAIL PLUS Mdl l/lll . 129.95 

POSTMAN MASS MAILMdl l/lll 74.95 

MAXI MAIL Model III 64.95 

Z BASIC MDL l/lll 79.95 



MICROTERM- Model I or I 



TZAL - Model III Tape 

BASIC EDITOR Model l.'lll Tape 

BOOKS 

How To Do II on the TRS 80 uG 

Machine Lang Disk I/O ug 

TRSDOS 2.3 Decoded ug 

Disk + Other Mysteries ug 

Basic Decoded ug . . . 

Custom TRS-80ug 

Basic Faster & Better ug 
Basic Disk I/O Faster & Better 

Captain 80 ug 

BFBLIBorBFBDEMDisk 

Inside Superutihty Plus 2 2 or 3 0/3.2 

Electric Pencil Manual 

CPM Users Guide 

Game + Graphics for TRS80 
TRS 80 Data Comm. Systems . . 
TRS 80 Model 100 Computer l.j 
Hardware Interfacing TRS80. . . 



69 95 



39.95 
24.95 



26.95 
26.95 
26 95 
2095 
26.95 
26.95 
26.95 
26.95 
17.95 
17.95 
17.95 
22.95 
15.95 
15.95 
12.95 
16.95 
14.95 



MAS BO Acctg System 

Integrated G/L, A/R. A/P & Ck Reg. 
Retail $599 00 SPECIAL S399.00 

Overview — $5 00 Credited on Purchase 

EPSON PRINTERS CALL FOR BEST PRICES 1 

TABCO PAR. DUAL PRINTER SWITCH 69.95 

MICRO BUFFER , • i i l 139 95 

NETWORX 4 PLUG SURGE PROTECTOR 69.95 

PRINTER STANDS 




SPACE AGE 

M) HI. ',! • • 

MXSOSpa ftgi 

Microime 82A Space Age 
Microime 83A Space Age 
NEC 802 3 A Space Age 
MX 100 Space Age 
Muitiuse I8k12x6xV« 
'32Coi w/slot 
Go' ilia Banana 
Ex 80 Space Age 
F X 1 00 Space Age 



NO FRILLS 



14.95 

27.50 r 

27.50i 

34.95 I 

27.50i 

34.95- 

24.95 

N/A ft 

N/A 

N/A - 

N/A 



!<iu 



19 95 

29.95 

29.95 

39.95 

29.95 

39.95 

i N/A 

■ 24.95 

, 19.95 

. 34.95 

.44.95 



AE HA,t A SMNO fOP UOS' PRiNHfj 

VisiT Our RetaH Location 
w^en is Ths New YorK Area 



ZIP BOX RELOADS 





1 Doz. 


Doz. 


Epson MX 70/80-20 Yds 


24.00 


42.00 


Epson MX 100- 30 Yds. 


30.00 


51.00 


NEC/Prownter 14 Yds 


21.00 


36.00 


Centronics 730737/739/779 or 






LP-l/ll/IV-16YdS. 


18.00 


33.00 


AH .'IP B0«( S j'f ina.Y«3.,*iy -.e*«! Mac. ny<m jnfl ieau>'» n. 


■ .. • 


... .,'. r ■'• \, 1 


..... 




■ 






CARTRIDGES 






Each 


Doz. 


Epson MX7CV80 


7.00 


60.00 


Epson MX100 


10.00 


108.00 


Prownter 8510 & Nee 8023A 


7.50 


75.00 


RS LP lll/V 


6.50 


66.00 


RSLPVI/VIII 


6 50 


66.00 


RS DSY WH II or DWP 410 Multi 


6.00 


66.00 


RSDSYWH II -Nylon 


6.50 


69.00 


RS DMP 2100 -Toshiba 1350 


9.00 


96.00 


MICROLINE 80/82A/83A/92 


N/A 


30.00 


MICROLINE84 ft x 40 Yds 


5.50 


60.00 


ANADEX - 9000 Series 


10.00 


108.00 


Diablo Hytype ll-Muiti Strike 


5.50 


54.00 


Diablo Hytype II - Nylon 


6.00 


60.00 


Qume-Multi Strike 


N/A 


36.00 


NEC— 5500/7700-Multi Strike 


6.00 


60.00 


Mannesman Tally 1000 


6.50 


66.00 


TTX1014 


8.00 


90.00 


Brother HR I (Film) 


5.50 


60.00 


Silver Reed Ex55/77 (Film) 


6.50 


66.00 


Wang System 5 


5.00 


48.00 


Xerox 6/0/620 Memorywriter-Multi 7.00 


75.00 


IBM DisplayWnter-MuIti 


8.00 


84.00 


• y- one* on 


y 




V -in m..--rr i-i"'ifl:r- .in, m . IvvnaM 




tocsi so 



—QUALITY GUABANTEED- 



Micro Images Industries Inc. 

^^^ m 164-06 Crocheron Ave. Dept. L 

visa Rushing. N.Y. 11358 mo,^^ 

"ta (212)445-7124 v 

HOURS: Mon.-Thurs. 10AM-6PM; Fit & Sat. 10AM-5PM 



ORDERING INFORMATION 

COO Orders ado S? 00 Minimum credit card order $25 00 FREE snipping on all prepaid cash 
orders within the continental 48 states via UPS Ground Actual shipping and insurance charges 
apply on al COO ordes. credit card orders, approved P/0 s and shipments outside the continent* 
48 stales Certified Ck M/0. COO and ciedrt cards sh«jed immediately Please allow 2 weeks for 
personal checks Credit c*d orders shipped to card address onty Prices subiec! to change 
without notice New York State residents please add appropriate sales tax . 
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Model in NEWDOS80 users can transfer 
source files from tape to disk with 
this LMOFFSET patch. 



Tape Transfer 



odd III NEW- 
DOS80 2.0 us- 
ers can't load 
tape- based 
source files be- 
cause NEWDOS's EDTASM doesn't 
support Model III tape input/output 
(I/O). While the DOS's documenta- 
tion describes how to load a source file 
from tape, zap 30 states that NEW- 
DOS supports tape I/O for the Model 

I only. 

I decided to rectify this. Rather than 
try to add Model III tape I/O capabili- 
ty to NEWDOS80 2.0's EDTASM, 
however, I modified the LMOFFSET 
program so it would load source files 
from tape to disk. You can do so by 
adding the LMOFFSET zaps indicat- 
ed in the Figure. The Program Listing 
shows the source code of the patch. 

To add the zaps yourself, copy LM- 
OFFSET and save it under a new file 
name. (The zaps destroy LMOFF- 
SET' s ability to handle system tapes 
and support tape-to-disk loading 
only.) Then use SuperZap to make the 
changes listed in the Figure. ■ 

For instructions on how to assemble 
source code, consult your editor/as- 
sembler manual or "An Idiot's Guide 
to Assembly Language, " Parts I and 

II #0 Micro, May 1981, p. 168, and 
June 1981, p. 112). 

Contact J.L. Kissel at 287 London 
Road, Isleworth, Middlesex, England. 



The Key Box 

Model II! 
NEWDOSM 2.0 



by J.L. Kissel 



At 00,58 


change: 






9D 53 C3 


E7 


53 


3E 


00 


CD 


3E FF CD 


57 54 CD 


3D 


58 


7B 54 10 


F9 


CD 


7B 


54 


C3 


to: 








D5 54 C3 












3E 00 CD 


7B 54 CD 


7B 


54 






















At 01, 6F 


change: 






At 00,63 


change: 






C3 50 55 


21 










FE 55 28 


0A CD 






to: 












to: 








C3 FC 56 


21 










FE D3 28 


0C CD 


























At 03, Al 


change: 






At 00,73 


change: 






F8 CD 20 


44 


C2 


57 


58 


D9 


CD 57 54 








21 9D 5E 


CD 


33 


57 


30 


FB 


to: 








FE 01 28 


0A 


FE 


02 


CA 


44 


CD 7B 54 








57 CD 5C 


57 


18 


0B 


CD 


5C 










57 05 05 


CD 


60 


57 


CD 


60 


At 00,78 


change: 






57 CD 60 


57 


10 


FB 


18 


DB 


58 CD 35 


02 FE 78 


CA 


CA 


7E FE 20 


D8 


FE 


FE 


DA 


48 


54 FE 3C 


28 05 CD 


92 


54 


58 23 5E 


23 


56 


23 


19 


AF 


18 EC 3E 


01 CD 7B 


54 


CD 


C9 CD 5C 


57 


CD 


5C 


57 


D9 


35 02 47 


C6 02 CD 


















to: 




















58 06 FF 


CD 35 02 


CD 


7B 


78 B7 












54 FE 1A 


CA 32 54 


10 


F3 


to: 












CD 35 02 


CD 7B 54 


FE 


1A 


F8 21 00 


52 


11 


00 


53 


06 


CA 32 54 


18 18 






00 CD 20 


44 


D9 


21 


9F 


5E 










22 74 53 


2A 


9D 


5E 


23 


23 


At 00, B7 


change: 






22 9D 5E 


ED 


5B 


9D 


5E 


IB 


58 CD 35 


02 FE 3C 


CA 


F8 


ED 53 9D 


bE 


7A 


B3 


CA 


45 


53 FE 78 


CA CA 54 


F5 


3E 


57 0E 00 


06 


01 


2A 


74 


53 


49 32 3D 


3C 3E FD 


CD 


57 


11 00 52 


ED 


B0 


22 


74 


53 


54 Fl C3 








D9 CD 3C 


44 


C2 


9D 


5E 


D9 


to: 








18 D9 D9 


CD 


28 


44 


C3 


59 


58 ED 5B 


9D 5E 13 


ED 


53 


57 B7 












Figure. Zaps lo LMOFFSET. 


Zap locations 


appear in sector 


md 


offset formal (e.g., 


XX, YY means sector XX, offset YY). 















Program Listing. Patch, the LMOFFSET modification program. 



53C6 
53C6 3E00 



00100 
00110 
60120 
B0130 
00140 
00150 
00160 
60170 
00180 
00190 
00200 
c | :: 1 1 



j LMOFFSET PATCHES 

I TO ALLOW LMOFFSET TO READ A EDTASM TAPE AND 
,-WRITE IT TO A DISK FILE FOR USE BY APPARAT 
;DISK BASED EDTASM 

;DISK FORMAT MAY BE COMPATIABLE WITH OTHER EDTASM 
I 

ORG 53C6H ; START OF PATCH 
.-CASSETTE IS ON AND SYNC HEADER HAS BEEN READ 

LD A,0H ;ZERO THE 



tlmta conlinufil 
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Listing conitnueii 



53C8 CD7B54 
53CB CD7B54 
53D1 



53D1 FED3 
53D3 28BC 



53E1 

53E1 CD7B54 



53E7 

53E7 B6FF 

53E9 CD3502 

53EC CD7B54 

53EF FE1A 

S3F1 CA3254 

53F4 1BF3 

53F6 CD35B2 80390 



j BLOCK COUNT 

;I.E. NUMBER OF SECTORS TO WRITE 



0022B CALL S47BH 

BB23B CALL S47BH 

00240 ORG 53D1H 

BB245 ; 

00250 ; FIRST BYTE OF TAPE IS NOW IN THE A REG 

00251 ( 

BB26B CP BD3H ; CHECK IF EDTASM 

00270 JR Z,53E1H ;TAPE AND JUMP IF IT IS 

B0271 | 

88272 |WRITE FIRST BYTE TO BUFFER 

BB273 ; 

88274 ORG 53E1H 

8B275 CALL S47BH ; FIRST BYTE TO BUFFER 

BB28B ; 

00298 (53E4 WILL CHECK FOR THE UP ARROW KEY ABORT FUNCTION 



53F9 CD7B54 
53FC FE1A 
53FE CA3254 
5401 1818 



00400 
08418 
88428 
BB43B 
80440 
8B45B 
88468 
88478 
5426 88488 

5426 ED5B9D5E 88490 

542A 13 0B50B 
542B ED539D5E BB51B 
542F C3E753 B0528 
5432 3E0B 
5434 CD7B54 
5437 1BF9 
5439 CD7B54 
543C C3D554 



B83BB ; 

08318 ORG 53E7H 

88330 RDBLK1 LD B,255 ;SET UP LOOP COUNT 

00348 RDBLK2 CALL 8235H ;READ A BYTE FROM TAPE 

BB35B CALL 547BH ;WRITE BYTE TO BUFFER 

88368 CP 1AH ;CHECK IF 

BB378 JP Z,TAPPIN ( END OF FILE 

003 80 DJNZ RDBLK2 ; LOOP FOR 255 BYTES 

CALL B235H jGET 256* S BYTE 

CALL 547BH ;AND SAVE IT 

CP 1AH ; CHECK IF 

JP Z,TAPFIN j END OF FILE 

JR 541BH ;ELSE CONTINUE TO READ TAPE 



;541B TWINKLES THE STARS AND CHECKS 
FOR CANCELED FUNCTION 



ORG 5426H 

LD DE, (5E9DH) ,-AND 



8853B TAPFIN 

88540 

08558 

00560 

BB578 

88 5 80 | 



INC DE 

LD (5E9DH) ,DE 
JP RDBLK1 
LD A,BH 
CALL 547BH 
DJNZ TAPFIN 
CALL 547BH 
JP 54D5H 



; INCREMENT 

JIT 

; CONTINUE READING TAPE 

;ZERO 

;THE REMAINING 

; BYTES OF THE BLOCK 

;TO TURN OFF TAPE 



0B5 9B .-CASSETTE IF OFF INTRUPTS ARE ON 
00688 ;NOW ASK FOR DESTINATION FILESPEC 



54D9 

54D9 C3FC56 



88618 | 

00620 

00630 



ORG 54D9H 
JP 56FCH 



;TO PILESPEC MESSAGE 







00640 


• 










08658 


I DISK FILE IS NOW OPEN 


STARTING WRITING TO DISK 






B8668 


| 






57B4 




B867B 




ORG 5704H 




5704 


210852 


886 88 




LD HL,52B8H 


(START OF FCB'S BUFFER 


5787 


118053 


886 98 




LD DE,53B8H 


;FCB ITSELF 


578A 


0600 


88780 




LD B,BH ;256 BYTE RECORDS 


57BC 


CD2044 


00710 




CALL 442BH 


;OPEN FILE 


57BF 


D9 


0072B 




EXX 


;SAVE ASSOCIATED FCB INFO 


5718 


219F5E 


8B73B 




LD HL,5E9FH 


; FIRST BYTE OF TAPE BUFFER 


5713 


227453 


88740 




LD (5374H) ,HL 


;PGM POINTER TO TAPE BUFFER 


5716 


2A9D5E 


00750 




LD HL, (5E9DH) 


;AJUST 


5719 


23 


08760 




INC tiL 


; BLOCK 


571A 


23 


0B77B 




INC HL 


; COUNT 


571B 


229D5E 


00780 




LD (5E9DH) ,HL 


;TO +1 OP TRUE VALUE 


571E 


ED5B9D5E 007 90 


WRDSK1 


LD DE, (SE9DH) 


;CKECK 


5722 


IB 


08 888 




DEC DE 


;IF 


5723 


ED539D5E 00 801 




LD (5E9DH) ,DE 


; 


5727 


7A 


00810 




LD A,D 


•SECTOR 


5728 


B3 


08828 




OR E 


/COUNT 


5729 


CA4557 


88 838 




JP Z.WRDSK2 


(COMPLETED 


572C 


0E08 


00 840 




LD C,BH 


(ELSE SET FOR 


572E 


8681 


08 858 




LD B,1H 


(256 BUTE TRANSFER 


5738 


2A7453 


B8 86B 




LD HL,(5374H) 


(POINT PIRST BYTE TO TRANSFER 


5733 


118052 


88878 




LD DE,52BBH 


•FCB BUFFER FIRST BYTE 


5736 


EDB0 


88 888 




LDIR 


(MOVE A SECTORS WORTH OF DATA 


5738 


227453 


88 898 




LD (5374H) ,HL 


(STORE UPDATED POINTER TO BYTE 


573B 


D9 


88900 




EXX 


;FOR PROPER FCB INFO 


573C 


CD3C44 


0091B 




CALL 443CH 


(WRITE A SECTOR 


573F 


C29D5E 


88920 




JP NZ.5E9DH 


(IF DISK ERROR 


5742 


D9 


88938 




EXX 


(BACK TO TRANSFER POINTERS 


5743 


18D9 


80948 




JR WRDSK1 


(LOOP BACK FOR NEXT SECTOR 


5745 


D9 


00950 


WRDSK2 


EXX 


(ORIGINAL REGS 


5746 


CD2844 


■■Ml 




CALL 44 28H 


(CLOSE FILE 


5749 


C35957 


00970 




JP 5759H 


(TO DONE MESSAGE 


8888 




00980 




END 




88800 TOTAL 


ERRORS 








32543 TEXT 


AREA BYTES LEFT 














End 
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PAGODA 



Face the deadliest assassins in the world in 
. Created by Jarvis McCrary, PAGODA 
will change your thinking of what a video game 
should be. Your mission is to ascend the five 
floors of the ODA in order to capture the 

golden sword that is protected by the dreaded 
NINJA. ODA takes Video Gaming one step 

beyond, with REAL-ACTION Graphics. This 
means that your character in the game can act 
just as you would. In order for you to successfully 
capture the golden sword you will Run, Duck, 
Perform Front Somersaults, Backflips and Climb 
Ropes. is 100% machine language, 

thus providing crisp graphics and sharp sound. 
(Model IV owners, PAGODA provides sound 
through your internal speaker, eliminating the 
need for an amplifier.) PAGODA forces you to use 
fast reflexes and strategy; in other words. Can you 
prevail against an assortment of NINJAS that 
Somersault, Dive, Flip and Attack you at every 
turn? is a game of which you will never 

tire, variations in play of the game provide endless 
challenge. You will need all of these talents and 
more against a varied assortment of the dreaded 
NINJA. is sure to keep you coming back 

for more. 

li 16KTape $17.95/32K Disk $19.95 



THE CALCULATOR KIDS 

Finally there is an educational game for your 
computer that your child won't tire of. This game 
was tested in school systems on scores of 
children. Latoska Fields and Carmen Williams 
teamed up to bring your child an entertaining 
challenge. In the Calculator Kids Adventure ff1, 
the quest is to find a sacred sceptre in an ancient 
castle. Along the way your child will encounter 
strange beings and collect other magical items. 
While roaming and searching the castle your child 
will have to answer mathematical questions to 
obtain items and open doors. The < 
Kids features the option of your child (or children, 
up to 5 can play at one time) selecting the skills 
they want to work with and what difficulty level 
they desire (1-10). Your child will never tire of the 
Calculator Kids because the game is different 
every time it is played. The Calculator Kids 
features REAL ACTION Graphics; doors open and 
close, items found can be taken out of the picture 
along with animation and other superb graphic 
tricks. The 48K version features more rooms and 
stunning machine-language graphic utilities. 
Purchase the Calculator Kids Adventure #1 
today, it's sure to become a favorite with you and 
your children. 

Model l/lll 16K Tape $24 95/32 K Disk $28.95 

Model l/lll 48K Tape $27.95/32K Disk $31.95 







ODA or CALCULATOR KIDS is available at finer computer and hobby stores or to order direct send 
check or money order to: 



t) LINEAR SOFTWARE 

'/ 3710 Lynn St. • Flint, Ml 48503 • (313) 743 9160 

VISA, MasterCard and CO D. phone orders accepted 

Please add $3.00 for shipping in the U.S.A. $6.00 Overseas Add $2 00 for COD 

Michigan residents add 4% sales tax. 

DEALER DISCOUNTS AVAILABLE 

^3^ Both games work on 

Model IV and Model III mode. 





You can selectively access data blocks 
in Basic programs by reassigning 
the data pointer. 



Data Grabber 




s a Basic pro- 
grammer, you 
might find that 
you want to ac- 
cess a specific 
block of data in a program. For in- 
stance, you may want to reuse data the 
program has already bypassed in its 
execution, or you might want to access 
data within a particular program area, 
like a program subroutine. 

Unfortunately, you can't selectively 
access a block of data in a Basic pro- 
gram because Basic reads data blocks 
from beginning to end; it can't read 
data from the middle of a block or ac- 
cess data it has already passed. 

Data Pointer, listed in both Basic 
and Assembly language, lets you set a 
target line so that your program can 
bypass unnecessary data and read only 
what you want (see Program Listings 
1 and 2). 

The Solutions 

One way to remedy this problem is 
by using the Restore command to read 
all irrelevant data into an unused vari- 
able. This, however, is time-consum- 
ing, especially if your data comprises 
mixed variables, such as string and nu- 
meric variables, in an unpredictable 
format. 

An easier way to solve the problem 
is to take advantage of the fact that the 
Models I and III read data from mem- 
ory locations 40FF and 4100 hexadeci- 
mal (hex). If you POKE an address in- 
to these locations that is below that of 
the line number you want to use, the 
program begins reading data on the 
next data line it encounters. 

Bask Line Structure 

Basic stores programs in a uniform 
format, beginning at the location to 



which addresses 40A4-40A5 hex 
point. The first 2 bytes of each pro- 
gram line store the integer address of 
the start of the next program line in 
least significant byte/most significant 
byte format. This is advantageous be- 
cause you can use this information to 
search for a particular line more 
quickly than by scanning through the 
entire Basic line or by computing an 
offset from a line-length byte. 

The next 2 bytes contain the line 
number. The text of the line follows 
this, with all reserved words stored in 
compressed-code format. The line is 
terminated by a 00H byte. 

The Method 

Data Pointer starts at the beginning 
of each line and scans the line number. 
If the line number doesn't match the 
target number, the program calculates 
the start of the next line and tests it in 
the same manner. 

Once Data Pointer finds a match, it 
decrements the address pointer by 1, 
setting the pointer to the previous 
line's end-of-line marker. The pro- 
gram then POKEs this value into 40FF 
and 4100 hex. 

Program Listing 1 demonstrates a 
Basic version of this calculation as a 
subroutine. It begins reading data 
from a line other than the first data 
line. It sets the variable INFO to the 
line number for which you're looking, 
and calls the data line calculation rou- 
tine in line 65000. 

This routine sets the Dl variable to 
the starting address of the Basic pro- 
gram. Line 65010 scans each line, put- 
ting each line number into D2 and 
comparing it against INFO. If Dl and 
D2 don't match, the program updates 
Dl so that it points to the start of the 
next line, and reruns the scan. If D2 is 



by David Goben 

equal to INFO, the program subtracts 
1 from Dl, and POKEs its value into 
40FF and 4100 hex (16639-16640 deci- 
mal). On return, you can read the de- 
sired data line. 

(Note that while the Restore com- 
mand in line 40 isn't necessary in this 
type of application, I used it here to 
assure you that the pointer initially 
points to an address other than the tar- 
get address.) 

Program Listing 2 is the Assembly- 
language version of Data Pointer. The 
CALL 0A7FH command picks up the 
value that you enter into HL. 

CALL 1B2CH scans Basic for a 
match to the line number in DE. The 
program returns the address of the line 
number sought in registers BC. It's 
then put to HL, decremented by 1, 
and loaded to the data pointer. 

To use this routine, load it using 
disk or system tape, and set memory 
to one below the origin. Take the ori- 
gin and set it to the USR address as 
demonstrated on pp. 8/8-8/12 of the 
Level II Basic Reference Manual, or 
pp. 191-192 of the TRS-80 Model III 
Operation and Basic Language Refer- 
ence Manual. 

For disk users this is defined as: 
DEF USR0 = address, although you 
can change the origin to anything with 
which you feel comfortable. ■ 

Write to David Goben at Box 30, 
Lecoma Star Route, Rolla, MO 
65401. 



The Key Box 

Models I and III 

Basic 

Assembly Language 
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Not only a spreadsheet, but a program generator as well 
So good we sell it on a satisfaction guaranteed 30 day trial 

LUCID 

on Snap- in™ ROM. Takes no memory to store or 
for operating overhead. All RAM is available for 
data storage. 

IS HERE! 



LUCID® is truly the spreadsheet plus. The result of a splendid, 
exhaustive research and development program to produce the 
fastest, most feature-rich spreadsheet for the Model 100 that 
gives you capabilities you cannot equal with Multiplan* or 
even Lotus 1-2-3**. 

$149.95. Call 1-800-641-4645, ext 207 for free info pak. 

Portable Computer Support Group, Inc. 

11035 Harry Hines Blvd., #207, DaUas, Tx. 75229 

First with software for the Model 100. 1-214-351-0564 

»™ VISA/MASTER CARD/C.O.D. 

■Registered trademark Microsoft Corp. 
"Registered trademark Lotus Corp. © 1984, PCSG, IllC. 
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LOG 

SUPERL0G and 

SUPERL0G 4 



KSoft's Electronic Notebooks. Free-format information manage 
ment for the 90% of your information needs that won't fit into a 
data-base or spreadsheet. 1024 characters per page. Lightning 
fast search and retrieval Interrupt activated and accessible while 
another program is running. 

A LOG or SUPERL0G Electronic Notebook is designed to replace 
your diary, address book, memo pad. card file, calendar, and 
scratch pad — so conveniently you will use it all day long. Call today 
for more information or immediate shipment 



SUPERLOG 4 
SUPERLOG 3 
LOG 
LOG 



for Models 4 and 4P 
for I. III. 4 and 4P 
for Model I 
for Model III 



TRSD0S6 8119.96 

LD0S5 1 $119.95 

TRSDOS 2.3 $ 49.95 

TRSDOS 1 3 So 49.95 



KSoft Inc. 

318 Lakeside Drive 
Brandon, MS 39042 



[601 ] 992-2239 CIS 70075,1 37 

MasterCard or Visa accepted 

Add $5.00 for shipping and handling 

Dealer inquiries welcome 



(TRSDOS is a trademark ot Tandy Corporation I 
(LOOS is a trademark ot Logical Systems Inc ) 



►^331 



Before Ms happens, 
callSAFEWARE 



800/848-3469 

(In (thin, (till 
614 262 0559) 

Protects your computer 
against theft, tire, power 
surges and other accidental 
lowes. Insures your entire 
system for as little as $35 a 
year — depending on the \alue of 
your hardware, software, and 
media lull replacement after a 
low $50 deductible 

We're SAKKV-ARK.' M the first name 
in computer insurance Tens of 
thousands of satisfied customers (all 
toll-free for rates or immediate 
coverage 

SrM El IRE, The Insurance Agency Inc 
RO. Boot 02211 
2929 N.rBgh Street 
Columbus, Ohio 43202 





• 368 
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Now you can learn how to 

use your color computer for 

more than just games . . . 

with HOT CoCo magazine. 



With the right information 
on programming utilities, 
debugging, and graphics 
there's no limit to what you 
can do with your color 
computer. HOT CoCo gives 
you that information. It can 
make your computer a versatile 
tool that you'll find 
indispensible. HOT CoCo is 
packed with: 

• Business application 
programs— to help you 
understand what the color 
computer can do at the office. 
You can use these applications 
immediately because they're 
written in plain English. 

• Home management help— let 
HOT CoCo show you how 
everyday chores can be done on 
your machine. You'll be surprised 
at just what you can do and just 
how much time can be saved with 
your Color Computer. 

• Programming tips & tutorials — 
HOT CoCo will show you how to 
program. It's loaded with 
programming techniques and hints 
to help the novice and 




expert programmer write 
and improve their programs. 
• New product reviews & 
announcements— if you're looking 
for equipment to expand the 
use of your computer, HOT CoCo 



reviews numerous hardware 
and software products each 
month. Plus, HOT CoCo's new 
product announcements let you 
comparison shop at home- 
spend more time at your 
computer and less time in 
computer stores. 
And HOT CoCo is loaded 
with challenging games to 
provide hours of fun and 
excitement for your whole 
family. 
Let HOT CoCo show you 
how much time you can 
save with your color 
computer. Order HOT CoCo today! 
Take advantage of this money- 
saving offer. Get 12 issues of HOT 
CoCo for only $24.97. A 13th issue is 
yours FREE with pre-payment (check 
or credit card). Use the attached 
order card, the coupon, or call 
TOLL FREE 1-800-258-5473. 
IN NH CALL 1-924-9471. 




LJ YES! I want more use from my CoCo! 

Send me 12 issues of HOT CoCo for $24.97 now! I understand 
that with payment enclosed or credit card order I will receive a 
FREE issue making a total of 13 issues for $24.97. 

□ Check Enclosed I - MC - - VISA DAE Bill Me $24.97 for 12 issues 



Card I 



_l',\\) I), iii' 



Signature. 
Name_ 



Address. 
City 



.State. 



Canada h Mexico SJ7.97. I year oniy. fS funds drawn on US bank. 
Parwign Surface $44 97. 1 year only. US funds drawn on I S hunk.. 
Pureijtn airmail please inquire Please allow fr-« weeks for delivery- 

HOT CoCo • PU Box 975 • Farmingdale, NY 11737 



.Zip. 



34NF8 



O* 40 Track 
& 80 Track 
& Single Head 
Or Dual Head 
& Bare 
& Complete 
Or Full Size 
& Half Size 
Or 5-1/4" or 8" 



COMPLETE DRIVES uoksih 

Fits TRS-80 Models 1 .3.4 and the HH 

Color Computer plus the others ^H 

that use standard drives. The drive I 

of your choice is mounted ^^ 

in a sturdy, all-steel cabinet. An external gold 
plated drive connector allows cabling without 
disassembly of the cabinet. Half-high drives come 
in a full-size cabinet that will hold and power our 
half-high drives. Single drives have a panel 
covering the unused space allowing a second drive 
to be added at any time. All are shipped fully 
assembled ready to use. Specify silver or white 
enclosure. 

40tk Single Side full size (TM10O-1) $189 

40tk Double Side fun size (TM100-2) 229 

80tk DS full size (TM101-4) 319 

1-40tk SS half-high FD-55A in dual case 189 

2-40tk SS half-high FD-55A's in dual case ...329 

1-40tk DS half-high FD-55B in dual case 219 

2-40tk DS half-high FD-55BS in dual case .399 

1-80tk DS half-high FD-55F in dual case 269 

2-80tk DS half-high FD-55Fs in dual case... 499 



These 8' Thinline drives work s^L^H 

with the Model 2 and 12 plus ^^H 

others that use standard ■ 

drives. The rugged all-steel ' a^»^^ 

cabinet has an extra heavy duty power supply 
rated for continous operation. A removeable air 
filter allows only clean air to circulate. Cabinets 
with single drives are supplied with a blank panel 
to cover the unused space. A second drive can 
be added at any time. Add $12 shipping and 
handling. 

1-8' SS Tandon TM848-1E & case $389 

2-8* SS Tandon TM848-1E's & case 649 

1-8- DS Tandon TM848-1E & case 499 

2-8* DS Tandon TM848-1E , s & case 849 



BARE DRIVES ** u s*h „ 

These drives are completely I WflM H 
burned-in and tested for your I BB S 
ultimate satisfaction. Add that I H ^m 
extra drive today! Please add $5 I Hal mm 
for shipping and handling for each drive 
ordered. 

40tk SS full size Tandon TM100-1 $159 

40tk DS full size Tandon TM100-2 199 

40tk SS half high TEAC FD55-A 149 

40tk DS half high TEAC FD55-B 189 

80tk DS full size Tandon TM101-4 289 

80tk DS half high TEAC FD55-F 239 

8" SS half high Tandon TM848-1E 260 

8" DS half high Tandon TM848-2E 375 
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DISK DRIVES 

Aerocomp leads the way to the BEST value in disk drives and related peripheral products 
on the market today. Sound engineering, high performance, quality construction, no-risk 
free trial, outstanding warranty service and a reputation for doing the right thing make 
your decision to buy Aerocomp the correct one. Please look over our offerings and 
make your selection. When you have made your choice call our toll-free number and 
place your order. If you need assistance in making your selection, please call our 
information number. It's listed in the box at the bottom of this ad along with the technical 
assistance number for those of you who want to get right to the nitty-gritty. Thanks, 
we all appreciate your business and will continue to do our very best to support 
you. 



TRS-80 Model III & 4 

DISK CONTROLLER 

and 

DRIVE KITS 



Convert your cassette Model III or 4 to 
disk operation with one of our complete 
kits. You receive our own advanced disk 
controller board with gold plated edge 
contacts capable of 4-drive operation; 
our own power supply; plated steel 
mounting towers complete with RFI 
shield plus all the cables and hardware 
necessary. Detailed instructions are 
included. All you need is a screwdriver 
and a pair of pliers. System kits come 
with 40 track single-side Tandon drives 
(TM100-1) or just order the basic kit and 
pick the drives you want from the 
selection in the next column. 

CONTROLLER KIT $199 

(Complete - Everything you nwd ■ MM drivw) 

1 DRIVE SYSTEM 349 

2 DRIVE SYSTEM 499 

CONTROLLER ONLY 110 

MOUNTING KIT & 

POWER SUPPLY 95 

RS-232 BOARD 69 



MISCELLANEOUS GOODIES « uh 

Model 1 TRSDOS 2.3 disk & manual $25 

Model III TRSDOS 1.3 disk & manual 25 

LDOS (specify Model I or III) 69 

NEWDOS 80 v2.0 (specify Model I or III)... .119 

10 disks in smoke lib box, Lifetime Guar 19 

5.25" drive power supply & enclosure 59 

8" drive power supply, end. & fan, 

5V-24V 150 

5.25" 2-drive cable 24 

5.25" 4-drive cable 34 

5.25" Extender cable with gold contacts 13 



FREE TRIAL OFFER 

Use your Aerocomp hardware product for up to 14 days. 
If you are not satisfied for ANY REASON (except misuse, 
damage or improper handing), return it (insured) r\ the 
original shipping container (or a full purchase price refund, 
less shipping Sorry. (Ma offer does not apply to 
software. Defective software win be replaced only. Any 
hardware/software specials will be prorated and the 
software w» be charged at the regular unbundted price, 
we have confidence in our products and we know you w ill 
be satisfied. 

WARRANTY 

We offer a one year warranty on parts and labor against 
defects in materials and workmanship. In the event service 
becomes necessary for any reason you wM find our service 
department fast, friendy and cooperative. We want to keep 
you happy Out of warranty repairs are also available. 



OUR FAMOUS 

MODEL I STARTER 

PACKAGE 

If you have a Model I and an Expansion 
Interface this is what you need to get started 
with disks. Included is one 40 track single-side 
disk drive complete with matching silver case 
and power supply, a 2-drive cable, a TRSDOS 
2.3 disk operating system and TRSDOS 
manual plus all insurance and delivery charges 
to your door (lower 48 states). 

Yours for only $ &w9 
We also have the LNW Model I Expansion 
Interface available. This unit comes with 32K 
RAM (the maximum) for a system total of 48K, 
a buiit-m RS-232C and a one year factory 
warranty. We have discounted the price of this 
nationally known unit to only 

319 delivered 

You can add our renown "DDC" double 
density controller to either the Radio Shack or 
the LNW E/l for 80% more storage capacity 
on your drive. Go ahead, you deserve 
increased density. See the opposite page for 
the latest details. 



$ 



$99 



100% BURN-IN and TEST 

aii our products are bumed-in and futy tested prior to 
shipment. We want you to receive an item ready-to-go. 
AEROCOMP means reliability! 

ORDER NOW! 

Can our toil-free number service and place your order. Have 
your American Express, Mastercharge or Visa number 
ready. We wM not charge your card until the day we ship 
your order. You may order by mail using your credit card, 
check or money order. Personal and company checks are 
welcome and cause no shipping delay as long as they are 
bank printed and the signature exactly agrees with the 
name printed on the check. We wi ship surface COD with 
no deposit but all COD's require cash or a cashier's check 
on delivery. Texas residents add 6% State Sales Tax. No 
tax collected on out of state shipments. Canadians add $20 
to your orders if over $500 for customs 
documentation 



call toll-free 
800-527-3582 usa 
800-442-1310 texas 

For inquiries or information 

or to check on or change an order 

call 214-339-8324 

AERCCCIilP 

Redbird Airport, Bldg. 8 
P.O. Box 24829 
Dallas, TX 75224 ^ 82 



# 



* 




• 







SYSTEM FEATURES 

• For TRS-80 Model 3-4-4P 

• One Year Warranty 

• Size Rated After Format 

• Continuous Duty Power 
Supply 

• Error Checking & Correcting 

• Continuous Duty Fan 

• Size 11.5" x 12.5" x 5.0" 



5 MEG 
HARD DRIVE 



Comes complete with cable and your choice of 
software driver* (CP/M, LDOS, TRSDOS) 



10 Megabyte Hard Drive 
15 Megabyte Hard Drive 



$995 
1195 



Now, for a reasonable price, you can enjoy the benefits of 
increased storage and faster disk I/O. These units are 
precision engineered, tested and delivered ready to use. 
Specify the software driver of your choice, add your disk 
operating system and get on with it. As always your satis- 
faction is guaranteed with our 1 4 day free trial offer. How can 
you go wrong? Order now and start enjoying your computer's 
real capability. 

■Model 3 requires I DOS 
Model 4 requires TRSDOS 62 or Montezuma Micro CP/M 2 2 Please add $10 handling & snipping 



See opposite page* » » » » » 



ll 



»t 




Double Density Controller 



Add 80% more capacity to your disk 
system with the Double Density 
Controller (DDC) from Aerocomp. 



The Story 




Some products have what it takes to seem to last forever Our DDC is 
one of those products What it does is allow you to operate your TRS-80 
Model 1 disk system in double density. In this case double density means 
almost doubling the storage capacity of your diskettes Single density, thats 
the way Rack) Shack designed your Model I expansion interface, organizes 
your disk into 10 sectors per track Each sector contains 256 bytes of data 
for a total storage capacity of 2,560 bytes or 2.5K per track times the number 
of tracks your drive is capable of add'essmg Double density. on the other 
hand, writes 18 sectors per track each containing 256 bytes for a total of 
4,608 bytes or 4 5K. That 80°.o more data in the same space Why didn't 
Radio Shack do that in the beginning, you ask? Well it costs money to do 
double density because it is more difficult to do than single density and the 
data is harder to capture reliably That means more cost and the Model i 
was meant to be a low-cost computer for the masses. Therefore, no double 
density. 



The Facts 



Other companies introduced double density controllers for the Model I but 
they were not so good. We waited and waited but even new models failed 
to correct problems with data separation that kept cropping up So we went 
to work and came up with a new design to cure the old problem. At last! 
A double density controller for the Model I with a higher probability of data 
recovery than with any other double density controller on the market then 
or since. Our analog design phase lock loop data separator has a wider 

.- See List of Advertisers on Page 176 



capture window than the digital types the others use This allows high 
resolution data centering. Our DDC analog circuit allows infinitely vanable 
tuning The attack and settling times are optimum for 5 25 diskettes The 
oft-stated fears of ad|ustment problems have been proved groundless by 
thousands of satisfied users the world over The bottom line here is 
state-of-the-art performance and reliability 

ORDER YOURS TODAY 

TRS-80 Model I disk system owners who are ready for reliable double density 
operation will get 80°o more storage per diskette single and double density 
data separation with far fewer disk I/O errors, single density compatibility; 
simple plug-m operation. You will need a disk operating system that has the 
necessary double density software All the popular DOS s (except TRSDOS) 
have the dnvers. We have put together two special packages in the event 
you don t already have one of the more popular DOS s. 

"DDC" by itself $99 

"DDC" and LDOS 1 59 

"DDC" and NEWDOS 80 v2.0 1 89 
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DAS, Misosys's 
editor/assem- 
bler, provides a 
special com- 
mand for load- 
ing Radio Shack EDTASM files with 
ED AS, but no such command exists to 
do the reverse: load an EDAS file with 
EDTASM. 

One solution is to make an EDAS 
source cassette tape using DTT, 
EDAS's disk-to-tape program, and 
load the tape using TPSRC, TRS- 
DOS's tape-to-disk program. This 
disk-to-tape, tape-to-disk transfer 
process is tedious, but it lets you access 
desired EDAS files with EDTASM. 

Rather than go through all that, I 
wrote Converter, a translator program 
that allows disk-to-disk file transfers 
between EDTASM and EDAS in 
either direction (see Program Listing 
1). Converter runs on the Model III 
under TRSDOS 1.3, NEWDOS802.0, 
and LDOS 5.1.2 and requires 32K 
of RAM. 

File Formats 

Before looking at Converter, it's 
important to understand the differ- 
ences between EDTASM and EDAS 
source files. Program Listing 2 is a 
sample program that I typed into ED- 
TASM on TRSDOS 1.3, EDAS 3.5.2 
on TRSDOS 1.3, and enhanced ED- 
TASM on NEWDOS80 2.0. 

Figure 1 shows how EDTASM 
stores that file on disk, and Fig. 2 
shows EDAS's format. Notice that 
EDTASM lacks a D3H header byte at 
the beginning of the file and lacks the 
6-byte file name following the D3 hex- 
adecimal (hex) header byte. 

Also, EDAS uses a 20H byte after 
line numbers, while EDTASM uses a 
09H byte. Each line number consists 



Converter makes disk-to-disk file transfers 
between EDAS and EDTASM. 



From EDAS to 
EDTASM and Back 

by David M. Zevchak 



of individual digits of the line number 
strung together plus BOH. For exam- 
ple, the editor/assemblers translate 
the line number 00125 as BOH, BOH, 
B1H, B2H, and B5H. 

Figure 3 displays NEWDOS80's en- 
hanced EDTASM source file. A com- 
parison between it and the EDAS 
source file reveals that they're com- 
pletely compatible. 

Converter 

Converter translates files between 
EDAS and EDTASM formats. You 
specify an EDAS file as the input file 
and the output file is an EDTASM 
file; an EDTASM input file results in 
an EDAS output file and vice versa. 

Converter first asks for the input 
source file. If the input file exists, it de- 
termines the type of file it is convert- 
ing. If the file format doesn't meet 
either the EDAS or the EDTASM for- 
mat, the program closes the input file 
and exits to DOS Ready. 

If the input file is an EDAS or ED- 
TASM file, Converter asks for an out- 
put file name. One caveat here: Don't 
specify the same file name for input 
and output files. Converter will write 
over your input source file. The pro- 
gram will then abort and return to 
DOS Ready, leaving you without an 
input or output file. 

Assuming you've entered a unique 
output file name, Converter begins the 
translation. If you're converting an 
EDTASM file to an EDAS file, Con- 
verter opens the new file for output, 
writes a D3 hex header byte to the new 
file, and writes a null file name. 

Following this is the line number 
from the original file and a 20 hex ad- 
dress follower byte. The rest of the 
original file data follows. 

When converting an EDAS file to 



EDTASM, Converter reads over the 
D3 hex header byte and the file name. 
It then opens the new file and transfers 
the line number. Converter replaces 
the 20 hex address follower with a 09 
hex address follower, then transfers 
the rest of the data for that line. 

If, during the translation of the 
source file the program discovers a file 
error, it saves the portion of the file al- 
ready translated to the output file and 
exits to DOS Ready. 

Figure 4 represents the original ED- 
TASM source file translated into 
EDAS format. Notice the null file 
name (six blank spaces) that the pro- 
gram assigns to the file. 

The lack of an internal file name in 
the EDAS file isn't a problem when 
loading to the EDAS disk editor/ 
assembler, but can cause problems if 
you transfer the file to tape after the 
translation and try to load it. 

You can handle this by loading the 
file into the editor/assembler and sav- 
ing it back again (this replaces the null 
name with a real name) or by changing 
the 20 hex byte in line 10010 to a literal 
character, such as A. This will give all 
your files the internal file name 
AAAAAA. 

The internal file name has no bear- 
ing on loading the file-to-disk edi- 
tor/assembler because it looks only at 
the name in the directory. ■ 

Contact David M. Zevchak at 143 
W. Leyte, Mishawaka, IN 46545. 



The Key Box 

Model III 
32K RAM 
Assembly Language 
Editor/ Assembler 
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000100: 
000110: 
000120: 
000130: 
000140: 
000150: 
000160: 
000170: 
000180: 
000190: 
0001A0: 
0001B0: 
0001C0: 
0001D0: 
0001E0: 
0001F0: 


B0B0 
4120 
5441 
4954 
B0B0 
0DB0 
4C44 
4720 
B0B0 
6C6F 
4120 
0945 
0000 
0000 
0000 
0000 


B0B1 B009 
5445 5354 
534D 2041 
4F52 2F41 
B0B2 B009 
B0B0 B3B0 
0941 2C42 
4220 494E 
B5B0 0909 
6769 6361 
616E 6420 
4E44 0D1A 
0000 0000 
0000 0000 
0000 0000 
0000 0000 

Figure 1. 


3B20 5448 4953 2049 5320 
204F 4620 5448 4520 4544 
4E44 2045 4441 5320 4544 
5353 454D 424C 4552 530D 
094F 5247 0937 3030 3048 
093B 0DB0 B0B0 B4B0 0909 
0909 3B4C 4F41 4420 5245 
544F 2052 4547 2041 0DB0 
414E 4409 3034 4809 093B 
6C20 616E 6420 7265 6720 
3034 480D B0B0 B0B6 B009 
0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 
0000 0000 0000 0000 0000 

EDI ASM file stored on disk 


A TEST OF THE ED 
TASK AND EDAS ED 
I TOR/ ASSEMBLERS . 


LD. A,B. . ; LOAD RE 
G B INTO REG A.. 

AND.04H.. ; 

logical and reg 











000100: 


0954 


4553 


5420 


20B0 


B0B0 


B1B0 


203B 


2054 


.TEST ; T 


000110: 


4 84 9 


5320 


4953 


2041 


2054 


4553 


5420 


4F46 


HIS IS A TEST OF 


000120: 


2054 


4845 


2045 


4454 


4153 


4D20 


414E 


4420 


THE EDTASM AND 


000130: 


4544 


4153 


2045 


4449 


544F 


522F 


4153 


5345 


EDAS EDITOR/ASSE 


000140: 


4D42 


4C45 


5253 


0DB0 


B0B0 


B2B0 


2009 


4F52 




000150: 


4709 


3730 


3030 


480D 


B0B0 


B0B3 


B020 


3B0D 




000160: 


B0B0 


B0B4 


B020 


094C 


4409 


412C 


4209 


093B 


LD.A,B..; 


000170: 


4C4F 


4144 


2052 


4547 


2042 


2049 


4E54 


4F20 


LOAD REG B INTO 


000180: 


5245 


4720 


410D 


B0B0 


B0B5 


B020 


0941 


4E44 




000190: 


0930 


3448 


90 9 


3B6C 


6F67 


6 963 


616C 


2061 


.04H..; logical a 


0001A0: 


6E64 


2072 


6567 


2041 


2061 


6E64 


2030 


3448 


nd reg A and 04H 


0001B0: 


0DB0 


B0B0 


B6B0 


2009 


454E 


440D 


1A00 


0000 




0001C0: 
0001D0: 
0001E0: 
0001F0: 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 


0000 
0000 
0000 
0000 














Figure 2. EDAS file stored on 


disk. 





DRV 00 

10 

0H 20 

30 

DRS 40 

415 50 

19FH60 

70 

80 

90 

A0 

B0 

FRS C0 

D0 

0H E0 

F0 



D354 
4849 
2054 
4544 
4D42 
4709 
B0B0 
4C4F 
5245 
0930 
6E64 
0DB0 
0000 



4553 
5320 
4845 
4153 
4C45 
3730 
B0B4 
4144 
4720 
3448 
2072 
B0B0 



5420 
4953 
2045 
2045 
5253 
3030 
B020 
2052 
410D 
0909 
6567 
B6B0 



20B0 
2041 
4454 
4449 
0DB0 
4 80D 
094C 
4547 
B0B0 
3B6C 
2041 
2009 
0000 



0000 0000 0000 0000 



B0B0 B1B0 203B 2054 .TEST ;.T 

2054 4553 5420 4F46 HIS. IS. A. TEST. OF 
4153 4D20 414E 4420 .THE. EDTASM. AND. 
544F 522F 4153 5345 EDAS. EDITOR/ASSE 

B0B0 B2B0 2009 4F52 MBLERS OR 

B0B0 B0B3 B020 3B0D G.7000H ;. 

4409 412C 4209 093B LD.A,B..; 

2042 2049 4E54 4F20 LOAD. REG. B. INTO. 

B0B5 B020 0941 4E44 REG. A AND 

6F67 6963 616C 2061 .04H. .; logical. a 
2061 6E64 2030 3448 nd. reg . A. and. 04H 

454E 440D 1A00 0000 END 

0000 0000 0000 0000 

0000 0000 0000 0000 

0000 0000 0000 0000 

0000 0000 0000 0000 



Figure 3. NEWDOS80 enhanced EDTASM source file. 



FOR TRS-80 MODELS 1, 3 & 4 
IBM PC, XT, AND COMPAQ 

Train Your Computer 
to be an 

EXPERT! 

Expert systems facilitate the reduc- 
tion of human expertise to simple. 
English-style rule-sets, then use 
them to diagnose problems "Know- 
ledge engineers " are developing 
many applications now 

EXPERT-2, Jack Park's outstanding 
introduction to expert systems, has 
been modified by MMS for MMS- 
FORTH V2.0 and up We supply it 
with full and well-documented 
source code to permit addition of 
advanced features, a good manual 
and sample rule-sets stock market 
analysis, a digital fault analyzer, and 
the Animal Game Plus the benefits 
of MMSFORTH's excellent full- 
screen editor, super-fast compiling, 
compact and high-speed run-time 
code, many built-in utilities and 
wide choice of other application 
programs 

( Rule 1 - demo in EXPERT-2 ) 
IF YOU WANT EXPERT-2 
ANDNOT YOU OWN MMSFORTH 
THENHYP YOU NEED TO BUY 

MMSFORTH PLUS EXPERT-2 
BECAUSE MMSFORTH IS REQUIRED 

EXPERT-2 

in 



000100: 


D320 


2020 


2020 


20B0 


B0B0 


B1B0 


203B 


2054 




000110: 


4 84 9 


5320 


4953 


2041 


2054 


4553 


5420 


4F46 


HIS IS A TEST OF 


000120: 


2054 


4845 


2045 


4454 


4153 


4D20 


414E 


4420 


THE EDTASM AND 


000130: 


4544 


4153 


2045 


4449 


544F 


522F 


4153 


5345 


EDAS EDITOR/ASSE 


000140: 


4D42 


4C45 


5253 


0DB0 


B0B0 


B2B0 


2009 


4F52 




000150: 


4709 


3730 


3030 


4 80D 


B0B0 


B0B3 


B020 


3B0D 


G.7000H ;. 


000160: 


B0B0 


B0B4 


B020 


094C 


4409 


412C 


4209 


093B 


LD.A,B..; 


000170: 


4C4F 


4144 


2052 


4547 


2042 


2049 


4E54 


4F20 


LOAD REG B INTO 


000180: 


5245 


4720 


410D 


B0B0 


B0B5 


B020 


0941 


4E44 




000190: 


0930 


3448 


0909 


3B6C 


6F67 


6963 


616C 


2061 


.04H. . ; logical a 


0001A0: 


6E64 


2072 


6567 


2041 


2061 


6E64 


2030 


3448 


nd reg A and 04H 


0001B0: 


0DB0 


B0B0 


B6B0 


2009 


454E 


440D 


1A42 


4C45 




0001C0: 


5220 


4150 


5045 


4E44 


4147 


452C 


2056 


4552 


R APPENDAGE, VER 


0001D0: 


5349 


4F4E 


2033 


2E30 


0DA0 


4F42 


4A45 


4354 


SION 3.0.. OBJECT 


0001E0: 


2046 


4 94C 


4520 


544F 


2044 


4953 


4B20 


4F52 


FILE TO DISK OR 


0001F0: 


2054 


4150 


453F 


2020 


2844 


204F 


5220 


5429 


TAPE? (D OR T) 






Figure 4. Converted EDTASM file. 






FORTH 



Another exciting tool for our 
alternative software environment 1 

• Personal License (required). 

MMSFORTH System Disk IBM PC $24995 

MMSFOfl^H System Disk TRS-80 ' 3 (X 4 . . $12996 

• Personal License (optional 
modules): 

FORTHCOM axnmunKatiOPS module .... $3995 

UTIUTIES $3995 

GAMES $3995 

EXPERT-2 expert system $6996 

DATAHANDlER $5996 

DA'AHANDlER-P'.US I for PC only) $99 95 

FOflTHYVRITE wort processor $'7SQC 

• Corporate Site License 
Extensions from $1,000 

Sntppng'handiing & tan extra 
As* your dewer to snow you the world oi MMSFORTH or 
request our free brochure 

MILLER MICROCOMPUTER SERVICES 

61 Lake Shore Road, Natick. MA 01760 

(617)653-6136 
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Change your DOS's Kill command (or any 
other library command) to one that 
more closely suits your taste. 



political terror- 
ist kills a hos- 
tage. A TRS-80 
owner kills a 
file. You might 
sense there's something wrong with our 
language when we use the same word 
to describe such disparate events. 

If you object to the use of words 
like "kill" as a library command, or if 
you're tired of using the same Model 
I/III library commands, you can re- 
name them in just a few minutes using 
the techniques I'll describe here. 

With a monitor program like Disk- 
zap (for DOSPLUS), Super Utility 
Plus (for TRSDOS), Zap (for MUL- 
TIDOS), or Superzap (for NEWDOS- 
80), you can change Kill or any other 
library command to suit your taste. 

The theory behind changing the Kill 
command is common to all the DOS- 
es. In each case, you need the com- 
mand's track and sector locations; 
you'll find them in the Table. As an 
example, I'll describe how to change 
the Kill command in DOSPLUS 3.4 in 
detail and give you a brief account for 
each of the other DOSes. 

Some DOSes provide a Help file 
that describes how to use library com- 
mands. You should change this file to 
reflect the renamed library command. 

DOSPLUS 3.4 

DOSPLUS 3.4 (for the Models I 



The Key Box 

Models I and 01 
DOSPLUS 3.4 and 3.5 
TRSDOS 2.3 and 1.3 
MULTIDOS 1.4 and 1.6 
NEWDOS80 2.0 



Thou Shalt Not KiU 



and III) includes a Diskzap monitor 
that finds the Kill command at cyl- 
inder 10 hexadecimal (hex), sector 2 
hex. 

Figure 1 is a screen dump of sector 
10 on a DOSPLUS 3.4 disk. The first 
two numbers in the left-hand column 
represent the track number, the sec- 
ond two numbers are the sector num- 
ber, and the last two numbers repre- 
sent the hex address of the first byte on 
the line. Following that is a dump of 
the sector from bytes 00-FF. 

To the right is the ASCII display 
area. (DOSPLUS 3.4 represents non- 
printable characters on the screen as a 
period.) The Kill command is obvious 
in line 20. I changed it to REMV for 
"remove," abbreviating to stay within 
the original four-character limit. 

You can change the Kill command 
with the monitor's Modify command 
(M) by substituting the appropriate 
hex characters from an ASCII con- 
version table. If your monitor includes 
an ASCII (A) option, you can make 
the change by inserting REMV in 
place of KILL. Look at Fig. 2 to see 
the result. 



by Josef Friedman 

DOSPLUS 3.4 has no Help com- 
mand to change. 

DOSPLUS 3.5 

DOSPLUS 3.5 provides Diskzap, 
too. In the Model III, DOSPLUS 3.5 
stores the library commands at track 
13 hex, sector 4 hex. In the Model I, it 
stores the commands at track 10 hex, 
sector 9 hex. 

DOSPLUS 3.5 command-name 
changes are more complicated than 
those of other DOSes because DOS- 
PLUS 3.5 adds 80 hex to the first char- 
acter of each command. This makes 
that character appear as a period in the 
ASCII column. 

DOSPLUS 3.5 represents the K in 
Kill as CB (4B hex plus 80 hex), not 4B 
(4B hex is the ASCII code for the letter 
"K"). Since the ASCII code for R is 
52 hex, you can insert D2 (52 hex + 80 
hex) in place of CB. Then use the 
ASCII option to change ILL to EMV. 
In the Model III, DOSPLUS 3.5's 
Help file resides at track 1 1 hex, sector 
8 hex. In the Model I, it resides at 
track 0E hex, sector 2 hex. 



DOS 


Monitor 


Command 


Help 


Miscellaneous 


DOSPLUS 3.4 


Diskzap 


10 hex, 2 hex 


No 


No 


DOSPLUS 3.5 


Diskzap 


13 hex, 4 hex 


1 1 hex, 8 hex 


Query 19 hex, OC hex 


TRSDOS 2.3 


SuperU 


16, 1 


No 


No 


TRSDOS 1.3 


SuperU 


16,4 


19, 10 


Lib 19, 2 
Mess. 20, 5 


MULTIDOS 1.4 


Zap 


16,9 


19, 14, and 15 


No 


MULTIDOS 1.6 


Zap 


18,4 


21, 14 


No 


NEWDOS80 2.0 


Superzap 


163 


No 


No 


Table. Track and sector locations needed to change DOSPL US, 


TRSDOS, MULT/DOS, 


and NEWDOS80 library commands. 
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EQDDCPaO 



TRS 80 COMPUTERS 
100% PURE RADIO SHACK 



CALL TOLL-FREE 1-800-248-3823 




TANDY 2000 




REVOLUTIONARY TANDY 
TRS-80 MODEL 2000 

The Ultra- Performance MS-DOS 
Personal Computer That* 
Twice the Speed ol the IBM PC 



$21 75 00 



LIST 
PRICE 

26-5103 Tandy 2000 Two Disk $2750.00 

26-5104 Tandy 20001 Disk and 10 Meg HD $4250 00 

26-5111 Monochrome Monitor $ 249.00 

26-5112 Color Monitor $ 799.00 

26-5140 Hi Res Graphic Monochrome Board $ 499.00 
26-5141 Hi Res Color Graphics Chip . $199.00 

26-5160 Internal 128K Kit $ 299.00 

26-531 1 Microsoft Multiplan $ 195.00 

26-5352 dBase II (Data Base) ' $ 595.00 

26-5330 Multmate $ 249.00 



MODEL 4 COMPUTERS 





LIST 


OUR 






PRICE 


PRICE 




26-1067 Model 4 16K Computer 


$ 899.00 


$ 740 00 


26-4005 


26-1069 Model 4 64K 2 Drive Computer . 


$1299.00 


$ 950.00 


26-6004 


26-1080 Model 4P64K Portable Computer 


$1299 00 


$ 950.00 


26-6005 


26-1 122 64K Memory Expansion 


$ 7995 


$ 75.00 


26-6006 


26-1127 Model 4 Internal Drivel 


$ 499.95 


$ 415.00 


26-6017 


26-1123 Model 3 to Model 4 Upgrade Kit. . 


$ 799 00 


$ 675.00 


26-6010 


26-1084 Model 4P Modem Board 


$ 149.00 


$ 127.00 


26-4155 


26-1595 Super Scripsit Model 4 


$ 199.95 


$ 169.00 


26-4156 


26-2216 CP/M PlusModeU 


$ 149.00 


$ 127.00 


26-4157 



MODEL 100 COMPUTERS 



LIST 
PRICE 

26-3801 8K Model 100 Computer $ 599.00 

26-3802 24K Model 100 Computer $799.00 

26-3804 AC Adaptor $ 5 95 

26-3805 Accoustic Coupler $ 39.95 

26-3816 8K RAM Memory Expansion Chip $ 119.95 

26-1409 Printer Cable $ 14.95 

26-1410 Modem Cable $ 19.95 

26-3809 Briefcase $ 49.95 

26-1183 Bar Code Reader $ 99.95 

26-3806 Disk Video Interface $ 799.00 



OUR LIST OUR 

PRICE PRICE PRICE 

$485 00 26-3127 64K Extended Color Computer 2 . $25995 $205.00 

$ 59000 26-3136 16K Extended Color Computer 2 ... $ 15995 $ 14900 

$ 5.00 26-3029 Disk Drive O for Color Computer . ... $34995 $299 00 

$ 34.00 26-1161 Disk Drive 1.2. 3, for Color Computer $279.95 $230 00 

$ 95.00 26-3018 Extended Basic Kit $ 39.95 $ 34 00 

$ 12.70 26-3030 OS- 9 With Editor Assembler $ 6995 $ 59 50 

$ 17.00 VIP Writer $ 59.00 

$ 42.50 VIP Calc ....... $ 4900 

$ 85.00 Telewriter Disk $ 59.00 

$ 660.00 Botek Interface $ 57 00 



RADIO SHACK PRINTERS 



OTHER MAJOR BRANDS 



26-1276 DMP-105 Dot Matrix Printer. . . 
26-1275 TRP- 100 Portable Thermal Printer 

26-1271 DM P- 110 50/25 cps Printer 

26-1255 DMP 120 Printer 120cps Matrix 
26 - 1 257 DWP-21 1 4cps Daisy Wheel 
26*1277 DMP-430 24 Wire Matrix Printer 

26-1270 DWP-510 43cps Daisy Wheel 

26-1274 DMP-2100P 24 Wire Dot Matrix. 



LIST 


OUR 


PRICE 


PRICE 


$ 199.00 


$ 169.00 


$ 299.00 


$ 230.00 


$ 399.00 


$ 299.00 


$ 499.00 


$ 385.00 


$ 599.00 


$ 485.00 


$ 899.00 


$ 745.00 


$1495.00 


$1225.00 


$1995.00 


$1650.00 



OUR 

COMPUTERS price 

Sanyo $ Call 

Columbia $ Call 

Epson $ Call 

Franklin $ Call 

Software $ Call 



OUR 
PRINTERS price 

Epson $ Call 

C. Itoh $ Call 

Okidata $ Call 

Star (Gemini) $ Call 

Hayes Modems $ Call 



FOR ORDERS CALL 1-800 248 3823 



a3JSjff££5SS ' FO R INFORMATION CALL 1-517-625-4161 



r,»*„i.n,.«M:v 
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DOSPLUS 3.5 requires one addi- 
tional zap. The Kill command has a 
query option. You must zap the 
KILL? query to REMV?. You'll find 
this at track 19 hex, sector OC hex in 
the Model III and at track 16 hex, sec- 
tor 9 hex in the Model I. 

TRSDOS 2.3 and 1.3 

You'll have to make TRSDOS 
changes with a separate monitor pro- 
gram, since TRSDOS doesn't provide 
one and its Debug utility can't access 
system files. You can use Super Util- 
ity Plus or any other such monitor 
program. 

You'll find the Model I's TRSDOS 
2.3 library commands at track 16, sec- 
tor 1. 

TRSDOS 1.3 (for the Model III) 
contains several areas that support the 
library commands. Track 16, sector 4 
contains the commands; track 19, sec- 
tor 2 contains the word listings for the 
LIB command. Track 19, sector 10 
contains the command descriptions 
for the Help command. Track 20, sec- 
tor 5 contains the screen message 
"Killing." 

MULTIDOS 1.4 and 1.6 

MULTIDOS 1.4 (for the Model I) 
has the library commands at track 16, 
sector 9 and the Help file at track 19, 
sectors 14 and 15. 

MULTIDOS 1.6 for the Model III 
has the library commands at track 18, 
sector 4 and the Help descriptions at 
track 21, sector 14. 



NEWDOS80 2.0 

NEWDOS80 includes the Superzap 
monitor program which will find 
the Kill command at disk relative sec- 
tor 163. ■ 



You can reach Josef Friedman at 
the department of math and computer 
science, Western Connecticut State 
University, 181 White St., Danbury, 
CT 06810. 



100200: 


464F 


5243 


4520 


B64E 


464F 


524D 


5320 


B74E 


FORCE .NFORMS .N 




180210: 


4652 


4545 


2020 


B94E 


4A4F 


494E 


2020 


B64E 


FREE .NJOIN .N 




100220: 


4B49 


4C4C 


2020 


B54E 


4C49 


4220 


2020 


BA4E 


KILL .NLIB .N 




100230: 


4C49 


5354 


2020 


B54E 


4C4F 


4144 


2020 


B54E 


LIST .NLOAD .N 




100240: 


5041 


5553 


4520 


BA4E 


5052 


4F54 


2020 


B7 4E 


PAUSE .NPROT .N 




100250: 


5245 


4E41 


4045 


B44E 


5253 


3233 


3220 


BA4E 


RENAME. NRS232 .N 




100260: 


5449 


4D45 


2020 


BA4E 


5645 


5249 


4659 


BA4E 


TIME .NVERIFY.N 




100270: 


B0D5 


0606 


CD6A 


5020 


37FE 


2F20 


0912 


1306 


jP 7./ 




1002B0: 


B3CD 


6A50 


2037 


FE2E 


2009 


1213 


0608 


CD6A 


•OP 7 j 




100290: 


5028 


2AFE 


3A20 


0912 


1306 


02CD 


6A50 


201D 


P *. : jP . 




1002A0: 


3E03 


12D1 


D501 


EE51 


CDA6 


50D1 


28C3 


AF01 






1002B0: 


00FC 


4FC9 


FE2A 


2009 


1213 


0602 


CD6A 


5028 


..o..» jP( 




100200: 


F.3D1 


C93A 


BB42 


4F7E 


23FE 


2028 


FAFE 


3A20 






1002D0: 


197E 


23D6 


30D8 


4F3A 


B742 


3DB9 


D87E 


23CB 


."I.0.O: .B«..~». 




1002F0: 


AFFE 


4128 


04FE 


4220 


0123 


2BAF 


C9D5 


E5EB 


..A(..B .1* 




1002F0: 


2306 


097E 


FE2F 


280D 


380E 


FE3A 


3804 


FE41 


».."./(. 8. .:8.. A 




Figure 1. Hex dump of DOSPLUS 3.4. 


track 10 hex, sector 2 hex. The Kill command 


is in 


line 20. 























100200 


464F 


5243 


4520 


B64E 


464F 


524D 


5320 


B74E 


FORCE .NFORMS .N 


100210 


4652 


4545 


2020 


B94E 


4A4F 


494E 


2020 


B64E 


FREE .NJOIN .N 


100220 


5245 


4D56 


2020 


B54E 


4C49 


4220 


2020 


BA4E 


REMV .NLIB .N 


100230 


4C49 


5354 


2020 


B54E 


4C4F 


4144 


2020 


B54E 


LIST .NLOAD .N 


100240 


5041 


5553 


4520 


BA4E 


5052 


4F54 


2020 


B74E 


PAUSE .NPROT .N 


100250 


5245 


4E41 


4D45 


B44E 


5253 


3233 


3220 


BA4E 


RENAME. NRS232 .N 


100260 


5449 


4D45 


2020 


BA4E 


5645 


5249 


4659 


BA4E 


TIME .NVERIFY.N 


100270 


00D5 


0608 


CD6A 


5020 


37FE 


2F20 


0912 


1306 


jP 7./ 


100280 


03CD 


6A50 


2037 


FE2E 


2009 


1213 


0608 


CD6A 


..jP 7 j 


100290 


5020 


2AFE 


3A20 


0912 


1306 


02CD 


6A50 


201D 




1002A0 


3E03 


12D1 


D501 


EE51 


CDA6 


50D1 


2BC3 


AF01 


> O..P.(... 


1002B0 


00FC 


4FC9 


FE2A 


2009 


1213 


0602 


CD6A 


5028 


..0..* jP( 


1002C0 


E3D1 


C93A 


B842 


4F7E 


23FE 


2028 


FAFE 


3A20 


BO~l. (..: 


1002D0 


197E 


23D6 


30D6 


4F3A 


B742 


3DB9 


D87E 


23CB 


."•.0.0: .B-.."#. 


1002E0 


AFFE 


4128 


04FE 


4220 


0123 


2BAF 


C9D5 


E5EB 


..A(..B .# + 


10021-0 


2306 


097E 


FE2F 


280D 


3 80E 


FE3A 


3 804 


FE41 


•.."./(• 8.. :8..A 


Figu 


re 2. Hex dump of DOSPLUS 3.4 with Kill changed to REMV. 




Happy! YES, AND YOU CAN BE TOO. He did not have to 
type in all his old data and programs. He used our package 
(FTP) and moved up to the IBM PC or T2000 and took everything 
with him. He used our File Transfer Program with conversion 
utilities and watched the computer work! Moving from APPLE, 
TRS, or CP/M machine to the IBM PC/XT/JR, T2000, or a 
compatible; CALL US. Our FTP can make you happy too! 



r 



PERSONAL 

■COMPUTER 

■■PRODUCTS 



ONLY $1 29.95 $3.00 S4H CA RESIDENTS + 6.5%| 
^^^^^STATECOMPUTERMOOELSWHENORDERINd 

• 17< 

1400 COLEMAN AVE., SUITE C-18 SANTA CLARA CA 95050 
TELEPHONE (408) 988-01 64 PHONE ORDERS 3 



l6M.TRS8C8i!ANOV APK£.CP,'MARt!?tSHCllVl.y"SQS^(?tD;RAD£MARKSOf iNTERWHOWl BuSNtSSMACHiNESCOW TANDvCGGPOfiAtiON APR£ COMPUTE H iNC DKSiTAi ^SIAT-Cm HC 



140 • 80 Micro. November 1984 



SEND AND RECEIVE 

MORSE CODE 

•TRIPLE SPLIT SCREEN 
•SPEED: 1-200 WPM 



This 4.5k assembly language program runs 
on your TRS-80™Mod«l I, III, or 4. The 
decoded Morse Code is displayed on the 
screen and may be printed. The keyboard 
buffer is active while either sending or 
receiving. The output Is either tone or keyed. 
I/O is via the cassette interface. The pro- 
gram runs from tape or disk (TRSDOS 2.3 or 
1 .3). Use It "on-the-alr" or for code practice. 

satisfaction guaranteed or your money back 
Cassette with booklet only $19.95 postpaid. 

ROGO Computer Products 

4752 DeBeers Drive ^343 

El Paso, Texas 79924 



LOOK!! 

Low prices on hard disk drives 

by Percom* for TRS-80" 

Model I, III & 4 

10 meg-$1 295.00 

20 meg-$1 795.00 

30 meg-$2395.00 

all are new and carry full 

factory warranty 

Driver & Cable-$85.00 

Cal 1-51 3-268-2108 

Mail certified check or money 

order to: 

JASTE ENTERPRISES, INC. 

7679 Sweet Potoato Road 

Brookville, OH 45309 

*TM Percom Data 

**TM Tandy Corp. 




WRITS OH— 
— WIP i OFF 

umimnn 



1000 Entry Changes Each Label 
Label Will Outlast the Device 
Permanent & Changeable Entries 
Ideal for Color Coding & Indexing 
Complete Kit of 24 Labels & Overlays 

1 Quik-Pen & Stor-Pak . . . $4.95 



Specify for: 

■ Floppy Disk 

■ VHS Video 



■ Cassette (Data-Audio) 

■ Hard Disk 

■ Beta Video 



Write or Call: 
Quick Label System 

301-725-0050 "»* 
437-B Main Street, Laurel, Md. 20707 

VISA — MASTERCARD — CHOfCE 
"•DEALER INQUIRIES INVITIED"* 




ISODVILL 
DIET 
PROGRAM 



$69.95 

"TAKE A BYTE".^* ^? 

MAINTAIN. LOSE OR GAIN WEIGHT & 

With Nw NODVILL DIET PROGRAM Takt • Byta 
and a TRS-M DO DIU M I/III/4 01 PC CompatlMa 

• Catevlata caloric and nutritiv* loo*. Inlaka 

• Cvahaafa nuimnw vatua ol your dial 

• CimpOT daMy dial to indmdual ROA Chart 

• Craarta paraonafcrao' dairy m*m and nanus 

• Wan* vartad daily manut baaad on aound nutmton 

• Sanraj racordi ol daMy maah) and manut lor lutura plannmg 

• Print nutnaon chant, food maal manu and grocary Intt 




Tafca a Byte" 



i Modular BASIC Prooram 



*L 



MAIN Prooram Manu 
i Dairy Diater. ABOMnca (ROA] CHART 
(i) 733 EipandaMa Random Accatt FOOO LIST Oata fila 

(3) 21 Nulnlnnal MEAL LIST Data Fila Eiamplai 

(4) 7 B tlin c ad OAILY MENU LIST Data FHa Eumptat 
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BNOOVILL SoRwara 
24 Nod Road 
MdgaflaM. Conn OM77 



EPSON* OWNERS 

We get letters on a regular basis 
from customers saying how much 
they enjoy receiving our lists. 

Ifs probably safe to say that our lists 
are different from most of the others in 
that they are as entertaining as they 
are informative, 

The lists are "slanted" toward the 
EPSON Printer user but should be of 
interest to the owner of most any 
microcomputer printer. 

Send us your name and address 
and we'll send you a rather fat 
envelope filled with computer 
oriented offers. 

ZYGOTRON 

P.O. Box 27 " 279 
Fremont, Michigan 4941 2 

UJts soot to USA adotesses ana bv mail only "EPSON 
trademark of Epson A/nenca me 



Max*N Floppy Disks 

The Mini-Disks 
with riKiximum quality 





Dealer inquiries 
invited COD'S 
accepted Call 
FREE (800) 235-4137. 



PACIFIC EXCHANGES 

100 Foothill Blvd . San Luis 
San Luis Obispo. CA 93401 
In Cal call (800) 592-5935 or 
(805)543-1037 

^ 207 



TRS 80 Computers 



NEW Computers, Accessories & Software 

26-5103 Model 2000 $2200 

26-1069 Model 4 $970 

264005 Model 12 $2800 

26-3802 Mod100-24K $650 



Manufacture Warranty 



26-5111 Monitor 
26-1158 Printer 
26-1256 Printer 
26-3801 Mod. 100 8K 



$180 
$1250 
$1600 

$500 



PLEASE CALL FOR PRICES ON OTHER COMPUTER PRODUCTS 

Visa — MasterCard — American Express 

Cashier's Check — Money Order — C.O.D. with 25% Advance 



Business T elephone Systems— Discount Prices— 

TALLEY COMMUNICATIONS CO. ^"SSZS*-"*- 

P.O. Box 193 • 121 N. State St. References Available 

Decatur, Texas 76234 • 817-627-5585 • 817-627-1017 Fast Delivery 

Call for other computer and accessory prices! Computer Specialist available for assistance. 



*>M7 



S— Utt of Advertisers on Page 1 76 



80 Micro, November 1984 • 141 



FANTASTIC COMPUTER PRINTER SALE!!! 



COM-STAR T/F 

Tractor 
Friction 
Printer 



only 



* * 



k iTiTnm n" fil n" i ilii rMiTTtTTT ~ miriTTrmTn rriViTrm i i rnViVi r iii nf "i^Tii 1 1 m i 1 » ;?'• ' 



COMSTAR 



• Lowest Priced. Best Quality. Tractor Friction Printers in the USA 

• Fast 80-120-160 Characters Per Second • 40, 46. 66. 80. 96. 132 Characters Per Line Spacing 

• Word Processing • Print Labels. Letters, Graphs and Tables • List Your Programs 

• Print Out Data from Modem Services • "The Most Important Accessory for Your Computer 



** DELUXE COMSTAR T/F 
80CPS Printer — $169.00 

This COMSTAR T/F (Tractor Friction) 
PRINTER is exceptionally versatile. It 
prints 8'//' x 11 "standard size single sheet 
stationary or continuous feed computer 
paper. Bi-directional, impact dot matrix, 
80 CPS. 224 characters (Centronics 
Parallel Interfact) 

Premium Quality 120-140 CPS 

10" COMSTAR PLUS+ 

Printer $269.00 

The COMSTAR PLUS+ gives you all the 
features of the COMSTAR T/F PRINTER 
plus a 10" carriage. 1 20 1 40 CPS. 9 x 9 dot 
matrix with double strike capability for 18 x 
18 dot matrix (near letter quality), high 
resolution bit image (120 x 144 dot 
matrix), underlining, back spacing, left 
and right margin settings, true lower 
decenders with super and subscripts. 
prints standard, italic, block graphics and 
special characters It gives you print 
quality. and features found on printers 
costing twice as much!! (Centronics 
Parallel Interface) (Better than Epson 
FX80) List $499 00 SALE $269.00 



Premium Quality 120- 140 CPS 
1 5 W COMSTAR PLUS+ 
Business Printer $369.00 

Has all the features of the 10" COM STAR 
PLUS+ PRINTER plus 15 ; ." carriage and 
more powerful electronics components to 
handle large ledger business forms! 
(Better than Epson FX 100) List $599 

SALE $369.00 

Superior Quality 140*160 CPS 

10" COMSTAR PLUS+ IBM 
IBM Pers/Bus Printer $389.00 

Has all the features of the 10" COM STAR 
PLUS+ PRINTER 1 It is especially designed 
for all IBM personal computers! 140 160 
CPS HIGH SPEED PRINTING 100 duty 
cycle. 2K buffer, diverse character fonts, 
special symbols and true decenders. 
vertical and horizontal tabs 
A RED HOT IBM personal business printer 
at an unbeheveable low price of $389.00 
(Centronics parallel interface) 
List $699 SALE $389.00 



Superior Quality 160-180 CPS 

10" COMSTAR PLUS+HS 

Business Printer $389.00 

The Super Com-Star+ High Speed 
Business Printer 160 180 CPS has a 10" 
carriage with all the Com Star* features 
built in! The 15'//' High Speed Business 
Printer is especially designed with more 
powerful electronics to handle larger 
ledger business forms! Exclusive bottom 
feed! (Centronics parallel interface) 
15V printer is also compatable with IBM 
Personal/Business Computers! 15'-." 
Printer List $799 00 SALE $489.00 



OOlympia 



Executive Letter Quality 
DAISY WHEEL PRINTER $399.00 

This isthe worlds finest daisy wheel printer 
Fantastic Letter Quality, up to 20 CPS 
bidirectional, will handle 14 4 forms 
width' Has a 256 character print buffer, 
special print enhancements, built in 
tractor-feed (Centronics Parallel and 
RS232C Interface) List $699 SALE $399. 



• 15 Day Free Trial - 1 Year Immediate Replacement Warranty 



z 



PARALLEL INTERFACES 



For VIC 20 and COM-64 - $49.00 For Apple computers - $79 00 Atari 850 Interface - $79 00 For ALL IBM Computers - $89.00 



Add $14 50 for (hipping, handling and in*uronco. Illinois ro» idont* 
ploowpdd 6% ton Add $29 00 lor CANADA PUERTO RICO. HAWAII. 
ALASKA. AFO-FPO ardor*. Canadian ordor* mgil ba in U.S. dollar* 
Wf DO NOT EXPERT TO OTHER COUNTRIES. 

Enclose Ca»hiar» Chock. Monoy Ordor or Par»onal Chock. Allow 14 
day* far dot ivory. 2 lo 7 day* lac phono ordar*. I doy aaprou mail t 
VISA-MASTER CARD- We Ship COD to U S Addresses Only 



(WE IOVE OU»> CUSTOM! NO) 



ENTERPRIZES 

BOX 550, BARRINQTON, ILLINOIS §0010 
Photw 312/332-5244 lo Offer 
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COMSTAR PLUS* 
Print Example: 



A1CDEPGHXJKLMNOPQR8TUVMXY 
MCOCFGHIJIUJINOPaRBTUVWXYZ 1234S67890 
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FLOPPY DISKS SALE *98C ea. 

Economy Model or Cadillac Quality 



LOR/IN 



CERTIFIED PE&SONAl 
COMPUTER OSK 



We have the lowest prices! loran 



CERTIFIED PERSONAL 
„ COMPUTER DISK 



♦ECONOMY DISKS 






Good quality 5Va " single sided single density with hub rings. 






Bulk Pac 100 Qty. 98$ ea. 


Total Price 


$98.00 


10 Qty. $1.20 ea. 


Total Price 


12.00 



CADILLAC QUALITY (double density) 

• Each disk certified • Free replacement lifetime warranty • Automatic dust remover 

For those who want Cadillac quality we have the Loran Floppy Disk. Used by professionals because they can rely 
on Loran Disks to store important data and programs without fear of loss! Each Loran disk is 100% certified (an 
exclusive process) plus each disk carries an exclusive FREE REPLACEMENT LIFETIME WARRANTY. With Loran 
disks you can have the peace of mind without the frustration of program loss after hours spent in program 
development. 

100% CERTIFICATION TEST 

Some floppy disk manufacturers only sample test on a batch basis the disks they sell, and then claim they are 
certified. Each Loran disk is individually checked so you will never experience data or program loss during your 

lifetime! 

FREE REPLACEMENT LIFETIME WARRANTY 

We are so sure of Loran Disks that we give you a free replacement warranty against failure to perform due to faul- 
ty materials or workmanship for as long as you own your Loran disk. 

AUTOMATIC DUST REMOVER 

Just like a record needle, disk drive heads must travel hundreds of miles over disk surfaces. Unlike other floppy 
disks the Loran smooth surface finish saves disk drive head wear during the life of the disk. (A rough surface will 
grind your disk drive head like sandpaper). The lint free automatic CLEANING LINER makes sure the disk-killers 
(dust & dirt) are being constantly cleaned while the disk is being operated. PLUS the Loran Disk has the highest 
probability rate of any other disk in the industry for storing and retaining data without loss for the life of the disk. 

Loran is definitely the Cadillac disk in the world 

Just to prove it even further, we are offering these super LOW INTRODUCTORY PRICES 
List $4.99 ea. INTRODUCTORY SALE PRICE S2.99 ea. (Box of 10 only) Total price $29.90 

$3.33 ea. (3 quantity) Total price $9.99 

All LORAN disks come with hub rings and sleeves in an attractive package. 



(Coupon Price $16.95) 



DISK DRIVE CLEANER M9.95 

Everyone needs a disk drive doctor 
FACTS 

• 60% of all drive downtime is directly related to poorly maintained drives. 

• Drives should be cleaned each week regardless of use. 

• Drives are sensitive to smoke, dust and all micro particles. 

• Systematic operator performed maintenance is the best way of ensuring error free use of your computer| 
system. 

The Cheetah disk drive cleaner can be used with single or double sided $%" disk drives. The Cheetah is an 
easy to use fast method of maintaining efficient floppy diskette drive operation. 

The Cheetah cleaner comes with 2 disks and is packed in a protective plastic folder to prevent contamination. 
List $29.95 / Sale $19.95 * Coupon IH.tS 



Add $3.00 lor shipping, handling and insurance. Illinois residents 
pleas* odd 6% tax. Add $6.00 for CANADA. PUERTC RICO, HAWAII. 
ALASKA, APO-FPO order* Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES. 

Enclose Cashiers Check, Money Order or Personal Check. Allow 1 4 
days lor delivery. 2 to 7 days for phone orders. I day express moil I 

VISA — MASTER CARD — C.O.D. 
_____ No C.O.D. to Canada. APOFPOJ 



* 5m Ual of Advertlsars on Page 1 76 
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BOX 550. BARfllNGTON. ILLINOIS 60010 
Phone 312/342 5244 to ordor 
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SAVE A BUNDLE 



WITH ONE OF 
OUR BUNDLES 



We have put together special bundles of software just in time to save you a bundle of money. Didn't you ever wonder why CP/M was so 
popular? The reason is the software availability. All programs (except EP) are for the Model 4/4P and have been optimized to install and run 
without hassle. For example, we have memory-mapped WordStar* and it runs circles around the standard version available elsewhere. We 
also added printer drivers for the Daisywheel II and the DMP-21 00. Our CP/M* 2.2 is the best around. Read the reviews. You iflfiff the 
programs. You know the prices. This is the years' best value. You owe it to yourseff to let these CP/M* programs and thousands of others 
(many in the public domain) start serving your needs. 



Bundle 
#1 



WordStar® 

MailMerge* 

SpellStar™ 

Starlndex~ otmmn* 

Montezuma Micro CP/M* 



Bundle #5 



299 



*149 

Delivered 



RETAIL VALUE $1009 



Electric Pencil' 
Red Pencil™ 
Blue Pencil 1 " 

Works with TRSD0S, NEWDOS-80, 

D0SPLUS and MULTID0S 

(Model 1.3,4) 

RETAIL VALUE $240 



Bundle 

#3 



WordStar* 

MailMerge- 

SpellStar™ 

Starlndex~ 

DataStar™ 

ReportStar" 

CalcStar™ 

Montezuma Micro CP/M® 

RETAIL VALUE $1699 



'499 

Delivered 



Save A Bundle on these books and disks 

Take advantage of our volume discounts. Buy any three items from this list and deduct $5 from 
your total order. Buy four deduct $10. Buy five ...deduct $15. Buy six., deduct $20 and so on. 
Buy a bunch, save a bundle. Please add $1 each for shipping Add $5 to orders under $50 for 
handling. 




•1984 by Montezuma Mcro WordStar*. SpeHSlaf, Startndex-. MartMerge # . DataStai-. RepertStaT and CaleStar betora to 
MicroPro* International Corporation CP/M* belongs to Digrtal Research Inc. dBASE II* belongs to Ashton-Tate. Ire Al trie Penete 
belong to Michael Shrayer Turbo Pascal" belongs to Borland International 



Bundle 

#2 
WordStar* 
DataStar" $000 

Rep0rtStar ^ ™!r.r 

CaleStar 1 - »•*"•'•■ 
Montezuma Micro CP/M* 

RETAIL VALUE $1354 



Bundle 

#4 



WordStar* 

MailMerge™ 

SpellStar'" 

Starlndex'" 

dBASE II* 

TurboPascal' 

Montezuma Micro CP/M* 

RETAIL VALUE $1553. 



599 

Delivered 



TRS-80 Disk A Other Mysteries. The "How to" book of data 
recovery lor the TRS-80 Model I disk operating system. 1 28 pages. Retail 
Retail $22.50 Now $18 

Microsoft BASIC Decoded A Other Mysteries. The com- 
plete guide to Level II and BASIC. 31 Zpages 
Retail $29.95 Now $24 

The Custom TRS-80 A Other Mysteries. The complete guide 
to customizing TRS-80 Hardware and Software. 336 pages. 
Retail $29.95 Now $24 

BASIC Faster A Better A Other Mysteries. The complete 
guide to BASIC programming tricks and techniques 290 pages. 
Retail $29.95 Now $24 

BASIC Faster A Better Library Disk. Contains 121 functions, 
subroutines and user routines. Search merge, compare and listing routines 
plus array handlers, BASIC overlays and video drivers. 
Retail $19.95 Now $16 

BASIC Faster A Better Demonstration Disk. Contains 32 
demos of the Library Disk contents above. 
Retail $19.95 Now $24 

BASIC Disk I/O Faster A Better A Other Mysteries. 
Programming tips and techniques to store/retrieve data from disk. 432 
pages. Retail $29.95 Now $24 

BASIC Disk I/O Faster A Better Demonstration Disk. All 
of the major demo programs and library of disk I/O subroutines in 25 BASIC 
programs. Random, Indexed Sequential and TREESAM file handlers 
included. Retail $29.95 Now $24 

Machine Language Disk I/O A Other Mysteries. Agukfe to 
machine language disk I/O for the TRS-80 288 pages. 
Retail $29.95 Now $24 

TRSDOS 2.3 Decoded A Other Mysteries. Detailed explana- 
tion of the Model I disk operating system 298 pages. 
Retail $29.95 Now $24 

How To Do It On The TRS-80. A complete applications guide to 
the TRS-80 Model I. II. III. 100, and Color Computer. 352 pages 
Retail $29.95 Now $24 

The Custom Apple A Other Mysteries. Who cares? 
Retail $29.95 Now $19 

Due to the nature of this business, mere are NO REFUNDS on software. We accept 
American Express, MasterCard. Vsa and COO Your card is not charged until we ship your order 
Personal and company checks are accepted without delay (cal lor details) Delivered prices are 
(or the tower rightmost 48 States only Prices and specificatorssut)^ to cttarige without notice rj 
It you dorft understand any ot this, just give us a call and we win take the time to explain it until * 
you do first-timers are always welcome here. 




MONTEZUMA 
MICRO 



•■475 



214-339-5104 

Redbird Airport Hangar #8 

P.O. Box 32027 

Dallas. Texas 75232 "WE KEEP YOU RUNNING 



ORDER NOW . . . TOLL FREE 

800-527-0347 
800-442-1310 

The Tc* Free inea ere tor orders only 
S ji e o nc e l M wsxjr^tocnertge without nottoa fl 
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HAS YOUR 

COMPUTER SUPPLIER 

DESERTED 

YOU? 



Look no further. 
Perry Computers can meet all 

your needs for major brand Items. 



Perry Computers has been In the computer 
business for seven years, and will be there 
when you need us. We don't believe in 
deserting you. 

Shop With us Toll Free - Simpiy ca 1 ! our Toll 
F^ee number to place your order Our 
knowledgeaDie & courteous sta*T w.n be cjad to 
take your order and answer your questions 

Choose From Top Quality Merchandise - AH 

merc h andise sold Oy Perry Computer is name 
brand with manufacturer's warranty Aii Items are 
the same as you would buy .'ocaliy 100% 
original, no upgrades l f a problem does occur 
just call us on ou r Customer Service Hotline 
517-625-4268. 

FOR ORDERS CALL 1-800-248-3823 

cnnnn 
cnnnn 



Watch For Monthly Specials - On a variety 

of systems and accessories If you ^<~e stepping up 
to a more powerful system, expanding or a first 
time user, be sure :o call about products s<~"cl 
b'.'ces 

Name Brands - RADIO SHACK, EPSON. 
COLUMBIA. SANYO. COMREX. OKIDATA. 
TRANSTAR, STAR, AMDEK. BOTEK. ELEPHANT, 
HAYES, VERBATIM, JUKI, SCOTCH. GORILLA. 
VIDEO PLUS, TELEWRITER. VIP TOM MIX. 
C ITOH. SKC, MANNESMAN TALLY. ANCHOR 
SIGNALMAN, IDS, KEYTRONICS. MOUSE 
SYSTEMS. PRINCETON GRAPHICS. ANADEK, 
CARDCO, TOSHIBA, ORANGE MICRO. 
MICROBUFFER AND MORE If you don't see 
what you're looking for, g/ve us a cali If at all 
possible we'll get if for you 



I II 
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PROJECT 80 / by Roger C. Alford 



Talk of the Town: 
A 300-Baud Modem 



Telecommunications plays an im- 
portant role in computing. This is 
obvious from the response I got to the 
January 1984 Project 80, "Hardware 
That Communicates," (p. 197) that 
described how to build an RS-232C se- 
rial communications board. 

If you want your computer to com- 
municate with another system, you 
have to use a modem with your serial 
port. The modem converts the signal 
from the serial board to one the tele- 
phone system can handle. The com- 
puter at the receiving end must also 
have a modem to convert the signals 
back. I'll show you how to build a 300- 
baud modem for this purpose. 

You can use a modem with any 
computer that has an RS-232C serial 
communications interface. Because 
it's a standard interface, even non-Ra- 
dio Shack systems can use it. There are 
no minimum system configuration re- 
quirements. 

The modem will use a new modem 
integrated circuit (IQ from National 
Semiconductor, the 74HC943, which 
has nearly all of the functions of a 300- 
baud modem on-chip. It requires sur- 
prisingly little support circuitry to 
make a complete direct-connect 
modem. 

Modem Basics 

If you're not familiar with the 
basics of serial communications, I rec- 
ommend that you dig up your January 
1984 80 Micro and review that issue's 
Project 80 (p. 197). 

As you might recall, serial ports 
output a serial bit stream at a specified 
baud (bits-per-second) rate. The baud 
rate at the receiving end must match 
these parameters. Since the 1 and zero 
values output from the serial port are 
represented by voltages, you can't di- 
rectly connect the output of a serial 
port to the telephone lines. The phone 
company wouldn't be pleased if you 
tried to send voltages over their lines. 

The phone system is, however, set 
up for communicating sound (fre- 




Photo. Completed 300-baud direct-connect modem. 



quencies) from one place to another. 
A modem converts the 1 and zero volt- 
ages from a serial port into predeter- 
mined frequencies, and puts these fre- 
quencies on the phone lines where they 
can be picked up on the other end. The 
receiving modem must also send its 1 
and zero values as frequencies, but 
these must differ to keep them from 
being confused with those from the 
first modem. 

Because these frequencies must be 
different, the first modem must be an 
originate modem, while the second 
must be an answer modem. The origi- 
nate modem transmits a logical 1 
(mark) value as a 1 ,270 Hz tone, and a 
logical zero (space) value as a 1 ,070 Hz 
tone. Similarly, the answer modem 
transmits a mark as a 2,225 Hz tone 
and a space as a 2,025 Hz tone. So that 
these two modems can work together, 
the originate modem receives marks 
and spaces at 2,225 Hz and 2,025 Hz, 
while the answer modem receives 
marks and spaces at 1,270 Hz and 
1,070 Hz. 

The names given to the modems, 
originate and answer, have no real 
meaning other than to indicate their 



typical uses. Since the system you're 
calling will generally answer using the 
frequencies of an answer modem, you 
must use the originate frequencies. Al- 
most all (if not all) commercial and 
university time-sharing systems and 
networks (including 80 Micro's BBS) 
will answer a call using the frequencies 
of an answer modem. You will nearly 
always want your own modem config- 
ured as an originate unit. The modem 
described in this column lets you select 
either mode. 



The MM74HC943 300-Baud 
Modem Chip 

The heart of this month's project is 
the 20-pin MM74HC943 modem chip 
from National Semiconductor. This 
chip incorporates all the functions of a 
300-baud modem (including filters) on 
a single chip, requiring only external 
resistors and capacitors for a full func- 
tioning modem. You can add a special 
line transformer to permit direct-con- 
nection operation to the telephone 
lines. Also, because the modem chip is 
made using high-speed CMOS pro- 
cesses, it consumes little power. 
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GET YOUR REVENGE!!! 

With THE REVENGE"* from UNICORN SOFTWARE. THE 

REVENGE is a remarkable new text adventure from a 
remarkable new company. Consisting of over two-hundred loca- 
tions, you must overcome man and beast to gain riches and 
reward. If you win THE REVENGE™ and are one of the first five 
persons to do so. you will win a complimentary copy of THE 
REVENGE II: The Starch for the Sceptre . upon its release. 

But THE RE VENGE 1 * Isn't the only high quality adventure that 
UNICORN SOFTWARE produces. We are also introducing SUN- 
DA V DRIVE M - an adventure so demanding that even it's objec 
tive is unknown. 

Both THE REVENGE"* and SUNDAY DRIVE™ (as are most of 
our adventures) are based upon t'Ml'ARSE™. Unicorn's own 
parser. IN II' ARSE™ is a semi-full language parser that accepts 
multiple commands of any length up to 255 characters. It also 
features game save and is written in assembly language for the 
fastest response. 

We at UNICORN believe in all of our quality software products, 
and so we back all of our software with a limited warranty and 
naturally all our software comes with complete documentation. 

THE REVENGE™ and SUNDAY DRIVE™ are S34.95 each in 

eluding shipping and handling. (Ohio residents add 5.5% Sales Tax). 

TRS-80* MOD I. Ill (IV) 

"Originality is our trademark'' 

Unicurn S?uftuiarc 

P.O. Box 954 

Lancaster. Ohio 43130 

(614) 654-4989 (Toll free soon) 

Author and Dealer Inquiries Invited 

(C) 1984 Unicorn Software 
•TRS-80 is a trademark o! TANDY Corporation 



LIST KEY 

THE PEOPLE PROGRAM 

OF THE PEOPLE 

List/Key is a sophisticate J list management program ded- 
icated to organizing information about people Name and 
address formats can he created with onlv a tew keystrokes. 

flV THE PEOPLE 

Lisi/Kev was crafted hv professionals to perform at top speed 
with maximum simplicity A thousand entries can be sorted in 
less than 20 seconds by simplv pointing the cursor at one of 24 
optional fields 

FOR THE PEOPLE 

List/Key can be easily modified tor home, business and 
professional applications. Hundreds of help messages, menus 
and prompts guide the operator through each step 

U) I HE PEOPLE 

List/Key can be reviewed at vour leisure We II scud a 
Demonstration Disk with sample tiles for onlv $25.00. 

lilt PEOPLE PROGRAM 

List/Key can store ^000 entries on vourTRS-tfO Model 3, 4 
or 41' system, using up to 4 disk drives and anv standard 
parallel printer. 

The List/Key Master Install Disk comes with a l 7 2-page 
Reference Manual, Quick Reference Card and spare disk in a 
handsome storage box. It's all just $250 

The l'eoplc Program is tor people like you! 



I he Soft Place 
P.O. Rox 7370 
Glendale, Calif 91205 
|8I8] 243-51 1 1 

^22 




b ft f ;/ Sales Company 



TABCO PARALLEL Printer Switch 

connect 2 printers to one computer! 



PSM-C/2P— Manual printer switch. Prolongs the life of your 
printer/interface connectors. Saves time & money! Use your 
existing printer cable to connect TAB SWITCH to your com- 
puter. Comes complete with two 3.5' cables to connect your 
printers. Straight-forward design makes it easy to set-up & 



704 W. Michigan Ave.; P.O. Box 8098 
Pensacola, FL 32505 Florida 904/438-6507 

SAVE A BUNDLE 



use. Fully guaranteed. 



ORDER TODAY 
Only $69.95 



Other models available 

$2.50 Shipping/Handling 

Florida residents add 5% sales tax 






EPSON, 

OKI DATA, 

CITOH, 

TABCO 
Printer Switches 

Specialty Printer Cables 

IJG Products 
Elephant Memory Diskettes 



X CALL 1-800-874-1551 



s See List of Advertisers on Page 176 

Scanned by Ira Goldklang - vwvw.trs-80.com 
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CDA COT FTLC 



Figure I. 74HC943 block diagram. 
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Figure 2. 500-baud modem schematic. 



As shown in the block diagram of 
the 74HC943 (see Fig. 1), the chip re- 
quires an external crystal for frequen- 
cy synthesis and detection. It also pro- 
vides a carrier detect (CD/) signal to 
indicate when a carrier is being re- 
ceived from a remote modem. The 
modem interfaces to external circuitry 
using CMOS level signals. They are 
not exactly TTL-compatible signals, 
which the modem design must take in- 
to account. 

Constructing the Modem 

The schematic for the modem 
board is shown in Fig. 2. The power 
connections for the ICs are shown in 
Table 1 , while Fig. 3 shows the tie-ups 
for unused gates. Also, the completed 
modem is shown in the accompanying 
photo. Building the modem from the 
schematic is straightforward. 

The 1488 converts the CMOS out- 
put level of the 74HC943 to RS-232C 
voltage levels ( + 5V to -5V voltage 
swing in this particular case). To put 
out a minus voltage, the 1488 requires 
a minus voltage applied to its pin 1 . As 
shown in the schematic, two cascaded 
ICL7660 ICs are used as + 5V to - 5V 
converters. The output of the second 
ICL7660 goes to pin 1 of the 1488, giv- 
ing the required minus voltage. If you 
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Figure 3. Unused gate tie-ups. 
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IC po wer connections. 



148 • 80 Micro, November 1984 



MODULAR I/O PORT KITS 

PARALLEL 8 BIT INPUT & OUTPUT • MODEL I 



GNtOBAOOlIK'. 

...... I 



NOW COMPATIBLE WITH COLOR COMPUTER 

INTERFACE I/O PORT SYSTEM TO COLOP 
COMPUTER VIA BUS ADAPTOR BOARD 

J107K Complete I/O Port Kit $35 

J107A Assembled and Tested I 'O Board $55 

J107B Bare I/O Port Board with Manual $20 

J107M I/O Port Assembly Manual $8 

J110K Complete Bus Adaptor Kit $15 

J110A Assembled and Tested Bus Adaptor $20 

J110B Bare Adaptor Board with Manual $12 

J110M Bus Adaptor Assembly Manual $ 5 

I 5V Supply (except J 1 10) 



T:C 



« ■ 



ft 



II ■>. 
J105A 
J105B 

t • • 
J105C 



Assembled 1.0 Port board 

Complete Buffer Board Kit $25 
Assembled and Tested Buffer Board $35 

Bare Buffer Board with Manual $15 

Buffer Board Assembly Manual S 6 

Cable (connects Buffer Board to $15 
4 I/O Port Boards) 



D & A Research 

400 vV son Avenue 

Satellite Beach, Florida 32937 

(305)777-1728 



^239 




ATTEXTIOX 

FOREIGN COMPUTER STORES /MAGAZINE DEALERS 

You have a large technical audience that speaks English and is in need of the 
kind of microcomputer information that CVV Communications/Peterborough 
provides. 

Provide your audience with the magazines they need and make money at the 
same time. For details on selling Microcomputing, 80 Micro. inCidcr. HOT 
CoCo, RUN contact. 

SANDRA JOSEPH WORLD WIDE MEDIA 

.386 PARK AVE. SOUTH NEW YORK, N.Y. 10016 

PH()NK-(212) 686-1520 TELEX-620430 



USE YOUR 

TRS-80 MODEL III. IV or 4P: 

• For direct measurement of 

voltage, or alarm conditions 

• With one resistor to measure: 

current, resistance, or 4 20 ma signals 

• With transducers to measure 

acceleration, dewpoint. force, humidity. pH. po- 
sition, pressure, temperature, velocity, viscosity, 
wind speed or direction 

• With Interfaces to turn power on/off, control analog 

voltage, motor speed, temperature, etc. 
Note We also manufacture the Model 100 A/D for the 
TRS-80* Model 100 Computer 

MODEL III, IV. or 4P— A/D. converter 
and digital interface for your TRS-80* Model m or IV 

• to 4 096 volts full scale ( adjustable I 

• 12 bit integrating A/D converter (.025%) 

• 16 analog voltage Input 

• 8 digital inputs, expansion to 24 bits 

• 8 digital outputs, expansion to 24 bits 

• 3 addressable output strobes 

Price: IBM Including software ($6.00 for manual), 

HUMPHREY 

INSTRUMENTS, INC. 

35 Cold Soil Road 

Lawrenceville, N.J. 08648 

(609)896-1612 ^32^ 

* TRS-80 is a trademark of The Tandy Corporation 
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Eliminate disk reboots and data loss due to oxi 
dized contacts at the card edge connectors 
GOLD PLUG 80 solders to the board edge con 
nector Use your existing cables (if gold plated) 

GOLD PLUG 80 Mod I Mod III 





TRS-80 + MOD I, III, COCO, 
TIMEX 1000, OSBORNE, 
TI99/4a others 

COCO MODULE INSTALLATION AVAILABLE 

COCO Disk Module 



Ground tab 
extensions 




III 1 1 llltllllll I Mil 



GOLD PLUG 80 Mod I (6) 

Keyboard/El (mod I) 
Individual connectors 
GOLD PLUG 80 Mod III (6) 
Internal 2 Dnve Cable 
Mod III Expansion port 






&4 



**» 



$44.95 
15.95 
$7 95 

4895 

29 95 

995 



IS IM 

COCO Disk Module (2) 
Ground tab extensions 
Disk Dnves (all R.S.) 
Gold Disk Cable 2 Dnve 
Four Dnve Cable 

Model I, 111/4 



9 <$r 



$1695 

INCL 

$7 95 
29 95 
39 95 



Available at youf favorite dealer or order direct trom E.A.P. CO. 

Dealer Inquiries Invited ■■■ 

VISA 
USA shipping S1 45 ■ .-, m. . : ., mmmmm 

f-ore«gn$7 TEXAS 5% TAX 

• trademark Tandy Corp 



P.O. 



PERCOM HARD DISK 

5 Mb Hard Disk $ 995.00 

10 Mb Hard Disk $1450.00 

SYNCOM DISKETTES $17.95/10 

(SINGLE SIDED DOUBLE DENSITY) 

GOLD PLUG 80-E.A.P. COMPANY ^ <'•-> 
Box 14 Keller. TX 76248 (817) 498-4242 



Scanned by Ira Goldklang -www.trs-80.com 
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have a -5V power supply available, 
you may eliminate the ICL7660's and 
the three respective 10 microfarad ca- 
pacitors. 

Output pin 5 of the 74HC943 is the 
receive data pin (RxD). This pin puts 
out the 1 or zero bit corresponding to 
the frequency being received from the 
remote modem. The RxD signal goes 
to a 1488 gate you convert to the ap- 
propriate RS-232C voltage level, and 
you connect the resulting signal to pin 
3 of the DB-25S connector. Your com- 
puter can then read the incoming data 
into its RS-232C port by connecting to 
the DB-25S with an appropriate cable. 

Pin 3 on the 74HC943 is the carrier 
detect (CD/) signal. This signal goes 
active (low) when a carrier is detected 
from the remote modem. This is set up 
to turn on an LED (light-emitting 
diode), and is also returned to the 
computer on pin 8 of the DB-25S con- 
nector (after being converted to the 
appropriate RS-232C voltage level). 

Being CMOS, the 74HC943's mini- 
mum input high voltage requirement 
(VIH) is less than the maximum 



guaranteed by a TTL-level driver 
(such as the 1489A). To assure a high 
enough output voltage, place a 10k 
pull-up resistor on the output of the 
1489A gate to the 74HC943. The 
1489A gate receives the transmitted 
signal from the computer's serial port 
on pin 2 of the DB25S and converts 
it from its RS-232C voltage level to 
the corresponding TTL level (then 
CMOS, with the pull-up resistor), giv- 
ing the modem chip the proper signal 
to generate the desired output tone. 

The transformer is a special 600 
ohm/600 ohm telephone line coupling 
transformer, designed to meet FCC 
Part 68 requirements. This transform- 
er lets you connect the modem directly 
to the telephone lines. As shown in the 
schematic, the transformer connects 
to two of the wires of a modular 
phone connector (the middle two — 
TIP and RING— green and red). 
These lines are interchangeable in this 
application. 

I used a Radio Shack female-female 
modular phone connector (see Photo 
and parts list in Table 2) for my board. 









Part 


Price 


Quantity Description 


Distributor 


Number 


(each) 


1 


74HC943 300-baud modem IC (National 


HA 


MM74HC943J 


$43.00 




Semiconductor) 








2 


ICL7660 DC positive to negative voltage 
converter IC 


RS 


276-2335 


3.79 


1 


LM1488 Quad RS-232C driver IC 


JDR 


LM1488 


.69 


1 


LM1489A Quad RS-232C receiver IC 


JDR 


LM1489 


.69 


1 


3.579545 MHz crystal 


DK 


X049 


1.50 


2 


100 fiF/35V electrolytic capacitor 
(PC mount) 


RS 


272-1028 


.79 


4 


10piF/35V electrolytic capacitor 
(PC mount) 


RS 


272-1025 


.59 


5 


. 1 nF/50V disk capacitor 


RS 


272-135 


.25 


1 


330 ohm resistor ( 14 watt) 


RS 


271-1315 


.08 


I 


5.6k ohm resistor (!/i watt) 


DK 




.05 


2 


2.2k ohm resistor (M watt) 


RS 


271-1325 


.08 


2 


4.7k ohm resistor (14 watt) 


RS 


271-1330 


.08 


2 


300 ohm resistor 


DK 




.05 


1 


10k ohm resistor (V* watt) 


RS 


271-1335 


.08 


1 


SPST micromini toggle switch 


RS 


275-624 


1.49 


1 


SPDT micromini toggle switch 


RS 


275-625 


1.59 


1 


600 ohm/600 ohm telephone line isolation 
transformer 


WDS 




12.95 


1 


Female-female modular phone connector 


RS 


279-358 


2.95 


1 


Modular telephone duplex jack 


RS 


279-357 


4.95 


1 


12 ft. modular-to-modular telephone 


RS 


279-374 


4.95 




line cord 








1 


DB-25S/RA right angle D-subminiarure 
connector 


JDR 


DB25SR 


4.42 


1 


Red light emitting diode (LED) 


RS 


276-041 


.35 




Table 2. Parts list and ordering information. 





The connector is actually two modular 
connectors glued together. Separate 
the two parts at the seam and cut the 
internal wires. Use the red and green 
wires for the transformer connection. 

The modem board has two switch- 
es, one to select the originate or an- 
swer mode (as discussed above) and 
one to put the modem on the tele- 
phone line. 

The 5.6k resistor connected to the 
TLA pin (pin 20) of the 74HC943 de- 
termines the signal level output of the 
modem. The resistor value specified is 
for the maximum signal level of the 
74HC943 (-9dBm [decimal reference 
level of 1 milliwatt over 600 ohm]). 
Most phone systems provide about 
3dB of attenuation from a phone to 
the exchange, thus a maximum signal 
level of - 12dBm would reach the ex- 
change. This is the maximum level 
permitted by most phone companies. 

You will also need a + 5V @50 mil- 
liamp power supply to run the modem 
board. 

Operating the Modem 

As I mentioned earlier, you can se- 
lect between answer and originate 
modes by using the toggle switch going 
to pin 13 of the 74HC943. The second 
toggle is an on-line/off-line switch, 
letting you connect the modem to the 
phone line. 

I should mention that all devices 
connected to the phone lines are sup- 
posed to have FCC approval. Al- 
though all the parts in this project 
meet the FCC Part 68 specifications, 
the project isn't FCC-approved. 
Neither I nor 80 Micro take responsi- 
bility for using the modem without 
FCC approval. 

To use the modem, you'll also need 
a two-to-one modular adapter (see the 
parts list in Table 2). This adapter will 
plug into the modular socket on the 
modem board, giving you two modu- 
lar sockets on the board. You should 
connect a telephone to one of the 
sockets and a wire going to the tele- 
phone line jack to the other. 

To call another computer system, 
make sure the answer/originate mode 
switch is properly set (usually in the 
originate mode); then dial the other 
system's phone number with the tele- 
phone (making sure the modem is in 
the off-line mode). When you get the 
answer tone from the remote modem, 
alter the modem switch to on-line and 
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hang up. The carrier-detect light 
should now go on, indicating receipt 
of the remote carrier. If the modem is 
properly connected to your RS-232C 
board (and your appropriate system 
software is running), you should now 
be able to communicate with the 
remote system. 

To end your communications with 
the remote system, merely switch the 
modem back to off-line. When the 
modem is off-line, you can use the 
phone normally. ■ 

/ would like to thank David Miner, 
field applications engineer for Nation- 
al Semiconductor, for his help in pro- 
viding necessary technical assistance in 
the development of this project. 



Addresses 

Hamilton/Avnet Electronics (HA), 
32487 Schoolcraft Road, Livonia, MI 
48150, 313-522^700. Hamilton/Avnet 
Electronics orders are COD. Michigan 
residents must add 4 percent tax be- 
fore ordering. Contact Hamilton/ 
Avnet oefore ordering for current 
price and availability. 

Radio Shack (RS), National Parts Di- 
vision, 900 E. Northside Drive, Fort 
Worth, TX 76102, 817-870-5662 

JDR Microdevices, 1224 S. Bascom 
Ave., San Jose, CA 95128, 800-538- 
5000 (or 408-995-5430 outside CA; 800- 
662-6279 within CA) 



Digi-Key Corp. (DK), Highway 32 
South, P.O. Box 677, Thief River 
Falls, MN 56701, 800-346-5144 or 218- 
681-6674 



Washtenaw Digital Systems (WDS), 
P.O. Box 2014, Ann Arbor, MI 48106. 
WDS orders must include $1 shipping 
and handling. Michigan residents add 
4 percent tax. Allow four to six weeks 
for delivery. 



Write to Roger C. A (ford at Washte- 
naw Digital Systems, P.O. Box 2014, 
Ann Arbor, MI 48106. Please include 
a self-addressed, stamped envelope 
for a reply. 
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LOWER THAN EVER ! 



LNWS TEAM COMPUTER $1095 
COMPUTERS 

LNW80MOO296K/CPM J1095 

PMC 80 1 6K TRS80 CLONE 450 

SYSCOM/BELTRON64K APPLE 475 

SANYO MBC 550 160KDR 735 

SANYOMBC5552160KDRVS 999 

SANYOMBC5552320KDRVS. 1200 

IBM 64K. 2 DRV. COLOR BO 2475 

NEC PC-8201 450 

TANDY 2000 2210 

EXPANSIONS 

LNW SYSTEM EXPANSION $329 

HOMES IM2 32K FOR TRS 80 MODI 129 

MDX-6 MOD 3 & 4 UPGRADE 230 

HOLMES VID 80+CPM 2 2 350 

DOUBLE DENSITY ADAPTER 99 

LN DOUBLER 5/8 & DOS+ 3.5 199 

HOLMES DOUBLER 5/8 125 

PRINTERS 

GORILLA BANANNA $149 

PROWRITER PAR 339 

PHOWRITER SER 499 

PROWRITER 15" PAR 570 

PROWRITER 15" SER 670 

F-10 40 CPS PAR/SER 999 

F-10 55 CPS PAR/SER 1299 

F-10 TRACTOR FEED 195 

EPSON RX 80 299 

EPSON RX 80 FT 399 

EPSON FX 80 460 

EPSON FX 100 875 

OKIDATA 82A 289 

OKI DATA 83A 500 

OKIDATA 84 P 795 

OKIDATA 92P 399 

OKIDATA 93 P 675 

STAR GEMINI 10X 269 

STAR GEMINI 15X 415 

STAR DELTA 10 465 

STAR DELTA 15 550 

SILVER REED 500 17 CPS DWH 369 

SILVER REED 550 20 CPS DWH. 469 

SIEMENS PT88 INK JET 699 

TOSHIBA 1350 LETTER QUALITY 1270 

JUKI 6100 *39 

CRT MONITORS 

AMDEK 300 GREEN $139 

AMDEK 300 AMBER 159 

AMDEK COLOR II RGB 429 

AMDEK COLOR I RGB 289 

TAXAN KG12N GREEN 129 

TAXAN KG 12NUY AMBER 139 

TAXAN RGB VISION I 289 

TAXAN RGB VISION III 470 

TAXAN APPLE CARD 99 

GORILLA GREEN/AMBER 95 



MODEMS 

SIGNALMAN MARK VII 300 BD 99 

SIGNALMAN MARK XII 1 200 BD 279 

NOVATION J-CAT 300 BD 1 04 

NOVATION SMART CAT 1 200 BD 41 5 

HAYES SMART MODEM 300 BD 205 

HAYES SMART MODEM 1 200 BD 465 



COMMUNICATIONS SPECIAL 

MTERM: SMART TERMINAL PROGRAM 

AND VOLKSMODEM 300 BD MODEM S99 



DISK DRIVES 

TANDON 100-1 40 TRK S/S $189 

TANDON 100-1 BARE 149 

TANDON 100-2 40 TRK D/S 255 

TANDON 100-2 BARE 210 

TANDON 100-4 80 TRK D/S 350 

TANDON 100-4 BARE 299 

TEAC FD55A 40TRK S'S 200 

TEAC FD55A BARE 165 

TEAC FD55B 40 TRK D'S 235 

TEAC FD55B BARE 160 

TEAC FD55F 80 TRK D'S 260 

TEAC FD55F BARE 210 

SPECIAL 

TEAC 54A SAME SPECS AS FD55A $150 

CHINON40TRS/S S129 

MATSHUSHITA40TRD/S 160 

TRS 80 SOFTWARE 

LAZYWRITER MOD ' $149 

ELECTRIC WEBSTER MOD I & 3 119 

DOS+ 3.5 MOD I & 3 99 

MULTIDOS 1.6 79 

SUPER UTILITY 3.0 65 

OMNITERM 1.6 78 

OMNITERM 1 6 MOD IV 78 

NEWSCRIPT 7 6 114 

TALLYMASTER 69 



ACCOUNTING SPECIAL 

GENERAL LEDGER. ACCOUNTS REC , 
ACCOUNTS PAYABLE. CHECK REGISTER 
INTEGRATED SYSTEM ONLY $299 



24 HOUR TOLL FREE ORDERS 

VISA/MASTER CHARGE ONLY: 

(800) 633-2252 EXT 720 

ALL QUESTIONS: (31 3) 538-1 1 1 2 

MICHIGAN RESIDENTS ADD 4* SALES TAX- 
SHIPPING CALL FOR CHARGES PRICES ARE 
DISCOUNTED FOR CASH AND MONEY ORDER 
(NON CERTIFIED CHECKS ALL 2 WEEKS TO 
CLEAR) MASTER CARD AND VISA ADD 3* NO 
COD NO NET TERMS 



X/FQD ACOMPUTER OUTLET 

V L.WI «T^ .ftV'Panon Del/on *-\ 48? ' 9 
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BBS EXPRESS / by J. Stewart Schneider and Charles E. Bowen 



A Closer Look at Messages 
And Data-Base Files 



Your message board is looking 
good; it can now accommodate a 
range of special-interest topics and 
handle specific requests. Last month's 
BBS Express gave you the code to read 
and write headers. This month we'll 
discuss messages and data-base files in 
detail. 

First, we'll clear up a few problems 
concerning storage. Your BBS stores 
headers of fixed length in a random- 
access file. Because messages are also 
of fixed length (20 lines of 64 charac- 
ters), you can store them in the same 
manner. 

Data-base files, on the other hand, 
aren't of fixed length; their size is lim- 
ited only by disk space. Therefore, 
you can't store them in random-access 
files. Instead of writing two routines, 
one for data-base files and another for 
messages, we've decided to simplify 
matters (and save disk space) by stor- 
ing them in individual sequential 
ASCII files. 

Carriage Returns 

Sequential disk files become slightly 
more complicated where carriage re- 
turns are concerned. The PRINTS 
(file number) command writes data in- 
to a sequential file, while the INPUTS 
or LINE INPUTS commands retrieve 
data. PRINT* works with the disk the 
way the Print command works with 
the screen. That is, if there's a semi- 
colon, the BBS program doesn't print 
a carriage return. If, on the other 
hand, a semicolon doesn't follow, the 
program adds a carriage return. 

Look, for instance, at the string in 
the following example: 

10 OPEN"O".l."TEST/DAT:0" 
20 LET AS "Hi there, sports fans" 
30 PRINTS, AS 
40 CLOSE 
50 END 

This prints "Hi there, sports fans 
(CR)" on disk. If you insert a semi- 
colon at the end of line 30, the pro- 




gram prints the string without the car- 
riage return. 

The following example removes the 
message from the disk and puts it onto 
the screen: 

10 OPEN'T\1,"TEST/DAT:0" 
20 INPUT#1,A$,:PRINTA5 
30 CLOSE 

This listing prints only "Hi there," 
because INPUT#1 stops inputting at 
the comma, which is a string termina- 
tor. If you change line 20 to LINE IN- 
PUTS, A$, the program prints the en- 
tire string. This is important because 
the BBS messages are divided into 
paragraphs, each with a carriage re- 
turn at the end. 

So that Basic won't interpret an un- 
wanted carriage return, we chose a 
substitute, CHR$(141), because it 
can't be sent from a remote system. 
The program sends messages sent to 
disk with PRINT#, changing all the 
carriage returns to CHR$(141)s. 

One other problem surfaces when 
you use carriage returns as line termi- 
nators. This exists when a caller enters 
a carriage return for another line after 



reaching the 64-character limit. It's 
necessary to differentiate between a 
carriage return that signals the end of 
a line and one that signals the end of a 
paragraph. 

The BBS Express does this by con- 
sidering the indentation. For example, 
the program checks to see if the next 
line of text is indented. If it is, the pro- 
gram writes the carriage return in the 
previous line to disk as CHR$(141). If 
the line isn't indented, the program 
changes the carriage return to a space. 
The resulting string is written to disk 
with a PRINTS command, followed by 
a semicolon, and read in with a LINE 
INPUTS command. You can see this 
at work in line 3420 of Program 
Listing 1. 

Writing a Message to Disk 

Listing 1 is what remains of the 
writing routine started last month. 



The Key Box 

Model m 
48KRAM 
Two Disk Drives 
Disk Basic 
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DISnDATo 

The Disassembler That Even 
"Tracks Down DATA!!! 



Outputs: 



instead ol the meaningless "equivalent" 



H37F7 DEFM Cass^ 
DEFB 03H 



AB2S LO BE 
ID H.C 
LD (HL).E 

LD (HLi.E 

CCF 

JR NZ.S-5 . etc 

• AUTOMATICALLY identities Such data areas 

» Outputs 'uiiy-'abeied Radio Shack or APPARAT EDTASM -lormai code to 
display printer, cassette or diSK (Printer output fully paginated I 

» Relocates itselt to any desired RAM area, up or down by as little as one byte or 
as many as required 

• Loads programs from cassette or disk and displays entry points 

• Runs on TRS^80 Model I (Level II). Model III. or Model 4 (in Model III mode). 
16K or more, cassette or disk 

• 1354-12 iModel I III cassette Version 2i 

■'354-22 Mode: Ml 4 diskette TRSDOS' format Version 2) 




• Copies virtually all formats uf cassette dies 1 " 
» AUTOMATICALLY senses input cassette density" 1 (Model III) 
» Allows Mod III usei selection ot oulpul density, each file 

• 1366-10 (Model I- III cassette) $19 95 



Professional Software for both Novice and Expert 




Software 



Too'tte' i^one.5!3 435 -4430 
M-r?i" • 5 p m EST .,. 
seio CMC* ■>' ^o^ey orde< ' ; 
Pro/Am Software 
220 Cardigan Road 
CenletviHe. Ohio 4S459 
^260 



> and MattofCard accaptetf 



x- aate ,00 

■a ----■!)*' 



S/ectronio JMcul 
o/v a/ Jmcro-/ 



- And a Public, Private or Pay BBS aa veil! Our 
system offers eo many featuree that it ia impossible 
to «*antion Host of them in an ad thia small. 

PROMINENT FEATURES INCLUDE! 

- Hulti levels of access to a user. 

- High security of system and your files. 

- Unattended message transfer to compatible system. 

- Fully aaintainable from a remote location. 

_ User configurable to include or exclude most 

features, allowing you to personalise your ay stem. 

- Number of users k messages configurable from 1 to 
900, al loving those with large storage to use it. 

- Configurable to handle many different terminala. 

- Supports HAYES type of modem. 

Available for TRS«-80 3-4 (Nevdos 80 Ver 2 required) 

I. B. M. PC, Columbia, or Corona with rom 1.53 -(Dos 

2.0 or better required). 



I.B.H. and compatible 
TRS-80 

Kail label module 
Terminal for I.B.H. 



9249.95 

199.95 
39.95 
79.95 



NOTE 1 prices quoted are payable in Canadian Funds. 
Save rnvmn more - mention vhere you aav thia ad vhen 
you place an order, and ve'll deduct $10.00 from your 
bill. 

TRY OUR BBS BY CALLING OUR DATA LIME - 604 946-0955 
For further information, contact 



&O-M0& J4433, 
eo4-J?46°-Z9'0 
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BASIC 

FOR MODELS I AND III 

JUST GOT 
BETTER 

INTRODUCING BASRUM. THE ONLY LINKING 
LOADER &. LIBRARY MANAGER FOR BASIC. 

BASRUM is designed to manage the subroutines you write and 
use in your Basic programs. Like an efficient tiling system, 
BASRUM saves you time, energy, and space. Best of all, it makes 
your program writing FASTER and EASIER, 
HOW DOES IT WORK? 

BASRUM lets you store your subroutines in "library" files, 
separate from the programs that use them. ANY Basic program 
can then use any routine in any file. You can even load up to 256 
routines to a special, protected memory area and use them 
AFTER you load other Basic programs! Naturally, you can 
replace or delete any routine from memory at any time. 
SUPER BENEFITS! 

NOW you can write a subroutine ONCE, store it on disk ONCE 
. . . but use it in ANY program at ANY time, AUTOMATICALLY! 
Load them once, use them all day. You can CHAIN from 
program to program, keeping the existing subroutines, variables, 
and file buffers. Your Basic programs, being shorter, will LOAD 
FASTER. NEED MORE MEMORY? You can break long 
programs into shorter modules and "overlay" the modules. 
BASRUM gives you complete control ot WHAT is loaded, 
WHEN it is loaded, and WHERE it is loaded. 
THE NITTY GRITTY. 

BASRUM was designed specifically for the models I and III 
for use with any DOS that is compatible with TRSDOS®. It's 
overlay structure requires onlv the top 1600 bytes of memory. 
There is NO LIMIT on the number of working copies. 
SIMPLE ENOUGH FOR THE BEGINNER, VERSATILE ENOUGH FOR 
THE PRO: IF YOU WRITE PROGRAMS IN BASIC YOU NEED BASRUM. 

TO Money order, check, VISA, MASTERCARD: $149.50 

ORDER: Specify memory size: 16K 32K 48K 
Select disk format: 

Model I: 35 track, single density 
Model III: 40 track, double density 

Guaranteed to perform as described or your money back. Orders 
are shipped via air, most within 24 hours. A complete manual is 

included. Information only? Send self-addressed, 

stamped envelope. 




by Wiley, Inc. 
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841 Bishop St., Ste. B-2 Honolulu, HI 96813 

(808)531-4314 

TRSDOS is a registered trademark of the Tandy Corp. 
BASRUM is a trademark of Wiley. Inc. 
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Program Listing 1. BBS module for writing data-base files and messages to disk. 

3350 PRINT'Correct (y/n) ?" ; :GOSUB130: PRINTCHR$( 17) 

3360 IFASC(I$)=78 THEN 3290 

3370 IFASC(IS)<>89 THEN 3350 

3380 CLS:PRINTCHR$(12) ;"Please enter your message now. " : PRINT'Up t 

o 20 lines, 64 characters per line. " :PRINT"Enter a blank line to s 

ignal the end of message" :S»1 

3390 TL=0:NC=-1:POKE M9,64:* set max line length 

3400 FOR LN=STO20 

3410 PRINTCHR$(17) :PRINTLN;": " ; : GOSUB130 : IF CT>64 THEN PRINTCHR$( 

17);"No more than 64 characters per line, please":GOTO 3410 

3415 IF ASC(I$)=141 THEN 3450 

3420 IF LN>1 THENCR=INSTR(MGS(LN-1) ,CHRS(141)) :IF ASC(I$)<>32 AND 

CR>0 THEN MID$(MGS(LN-1) ,CR, 1) =CHR$ ( 32) 

3430 LSET MG$(LN)»I$:MG(LN)=CT 

3440 NEXT LN 

3450 PRINTCHR$(17) : LN=LN-1 : PRINT: PRINT'Leave Options: " 

3460 NC=0:TL=-l:PRINT"Subcommand (? for HELP): " ; :GOSUB130 : PRINTCH 

RS(17):IF CT=0 THEN 3460 

3470 C$=LEFT$(I$,CT) 

3480 ONINSTR("SLRADCSP",C$) GOTO3520, 3650, 3660, 3620, 3660,3510, 

35015 

3490 PRINT"? - Prints this list" : PRINT'S - Stores message" : PRINT'S 

P - Store Private Message" :PRINT"A - Abort message" : PRINT'R - Repl 

ace Line":PRINT"L - List Message" :PRINT"D - Delete line" :PRINT"C - 

Continue entering text" :GOTO3460 
3500 S7$=CHR$(32) :GOTO3520 

3510 S=LN+1:IF S>20 THEN 3460 ELSE CLS : PRINTCHRS ( 12) :G0T033 90 
3520 IF B THEN RETURN 

3530 M2=M2+1:SH-SH+1:IF SH>9999 THEN SH=1 
3 540 MN=SH :A$="MSG0 00 0/BBS"+DD$: GOSUB 860 
3550 OPEN"0",3,A$ 
3560 FOR Z=1T0LN 

3570 IF MG(Z)>0 THEN PRINT#3 , LEFTS (MGS ( Z) ,MG ( Z) ) ; 
3580 NEXT Z:PRINT"Message";SH;"stored. ..":CLOSE 3 
3590 SN=SN+1 

3600 MN$=MN$+MKI$(VAL(N$) ) 

3620 PRINT"Abort (y/n) ?";: GOSUB130 : PRINTCHRS ( 17) ; 
3630 IF ASC(I$)=78 OR (ASC(I$)<>89) THEN 3460 

3650 FOR Z=1T0LN:PRINTZ;": " ; LEFT$ (MG$ ( Z) ,MG ( Z) ) : NEXT Z:GOTO3460 
3660 PRINT"Enter line #" :GOSUB130 : IFCT=0THEN3460 
3670 Z=VAL(I$) : PRINTCHRS (17) : IF Z<1 OR Z>LN THEN 3460 
3680 CLS:PRINTCHR$(12) .-"Line currently reads: " :PRINT:PRINT LEFTS( 
MGS(Z) ,MG(Z) ) 

3690 IF C$-"R" THENTL=0:PRINT"New line: ";: GOSUB130 : PRINTCHRS ( 17 ) : 
TL=-1:IF CT=0 THEN 3460 ELSE LSET MGS ( Z) =1$ : MG ( Z) =CT: GOTO3460 
3700 MG(Z) -0:GOTO3460 



Program Listing 2. BBS module for reading and printing data-base files and messages. 

350 ES=INKEY$:N=VAL(RIGHTS(F2$,4) ) :T$=Tl $: TT$=F1$:S8S=S1 S: S9S=CHR$ 

(ASC(S2$) AND 15) :S7S=CHRS(ASC(S2S) AND 240 ): S6S=MID$ ( "01234567 89A 

BCDE",ASC(S9$) ,1) 

360 RD=-1:IF FN P(RN,MN$)<0 THEN RD=0 

380 IFINSTR(SE$,S6S)=0THENRD=0 

390 IF ((ASC(S7$) AND 32)=32) AND (LEFTS (T$ ,LEN(NA$) ) ONAS) AND (L 

EFTS(TTS,LEN(NA$) ) <>NA$) AND NOTSY THEN RD-0 

400 IF (SF$="T" AND INSTR (TS ,SSS) *0) OR (SF$="F" AND INSTR (TT$ ,SS$ 

)=0) OR (SF$="S" AND INSTR(S8$,SS$)=0) THEN RD-0 

410 IF (DS="M") AND (ASC(S7S) AND 16) =16 THEN RD=0 

415 IF E$=CHR$(3)THEN RN=E 

420 RETURN 

4720 GOSUB1230:IF PR THEN 5030 

4730 PRINT"Message #";N;" SEC. ";S6$;" ";S$(ASC(S9$) ) 

474? L=INSTR(T1$," "):IF L = THEN L=LEN(T1$) 

4750 PRINT'To: "; LEFTS (T1S ,L) ; " 

4760 IF (ASC(S7$) AND 16) =16 THEN PRINT"(X)"; 

4770 IF (ASC(S7$) AND 32) =32 THEN PRINT" (P)"; 

4780 PRINT 

4790 L=INSTR(F1S," "):IF L=0 THEN L=LEN(F1$) 

4800 PRINT'From: " ; LEFTS (F1S,L) 

4810 L=INSTR(S1$," "):IF L-0 THEN L=LEN(S1$) 

4820 PRINT'Subject: " ;LEFT$(S1S,L) 

4830 PRINT"Date/Time: " ;T2S:PRINTLEFT$(SS,SV) 

4 840 IF SF THEN RETURN 

4850 OPEN"I",3,F2$+"/BBS"+DD$ 

4860 GOSUB1230:IF PR THEN 5130 

4870 POKE RE,SV 

4880 IF EOF(3) THEN 5020 

4890 IF INKEY$-CHR$(16) THEN 5020 

/ isimii .' continued 



After the caller addresses the message 
and lists its subject, lines 3350-3380 
ask the caller if the header is accurate. 
If so, the program prompts the caller 
to enter the message in the allotted 
space: 20 lines of 64 characters. The 
first line is indicated by 1:. 

Lines 3400-3440 transfer the mes- 
sage from a GOSUB 130 (the telecom- 
municating Input statement) and 
LSETs 1$ (the characters received) in- 
to MG$(LN), a temporary storage ar- 
ray. The program has previously di- 
mensioned each of the elements here 
to 80 characters so you don't lose any 
additional string space. 

Line 3420 checks for carriage re- 
turns (CHR$(141)), removing them if 
the line isn't indented. Lines 3450- 
3700 deal with leave options. The 
GOSUB 860 in line 3540 inserts the 
message into the string MSG0000 
/BBS, constructing the secret file that 
we discussed last month. MN$ is an in- 
memory index of all the messages on 
the board. Because each message 
number is represented by a 2-byte 
string in MN$, it's easy to locate a 
message. We'll learn to manipulate 
MN$ in a later column. 

Reading and Printing 

Program Listing 2 lets callers read 
messages on the board. We erroneous- 
ly omitted lines 350-420 from last 
month's listings. These lines decode 
the information bit-mapped into S2S. 
They also contain the file name and 
other fields of Messages/BBS, and de- 
cide if the caller is allowed to read the 
message. 

Lines 4720-4830 put the header in- 
formation on the screen, while lines 
5030-5110 send this information to 
the line printer. If the scan flag (SF) in 
line 4840 is set to SF = - 1 , it prints 
only the headers, not the text. This 
gives you the option of reading or 
scanning the messages with a single 
routine. 

Lines 4850-5020 are responsible for 
the text of both the messages and data- 
base files. Line 4850 opens the secret 
file on the data drive, while line 4870 
POKEs address RE with the video 
width, starting the reading process. 
The program tests for end-of-file in 
line 4880. Line 4890 checks for a 
control-P (CHR$(16)), indicating that 
the caller has ceased reading. Line 
5020 then brings you to Close and 
Return. 
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The exception to the video formatting routine is the 

.IMG extension. You don't want Basic programs with 

carriage returns in the middle of them, because the 

caller's Basic won't load them. The .IMG extension 

signals the program to forget about video formatting. 



Line 4895 checks the UART status 
for loss-of-carrier if you're not operat- 
ing from the console. If the caller 
hasn't hung up without first logging 
off, line 4900 invokes a LINE INPUT 
command that puts a string from 
disk into A$. Line 4910 changes the 
CHR$(141)s to carriage returns for 
printing. Line 4920 formats the string 
to the caller's screen width. 

The exception to the video format- 
ting routine is the .IMG extension. For 
example, you don't want Basic pro- 
grams (XA files) with carriage returns 
in the middle of them, because the 
caller's Basic won't be able to load 
them; therefore, the .IMG extension 
on a file signals the program to forget 
about video formatting. 

Finally, the program prints each 



character in A$, while it checks for 
control-P, XOFF (CHR$(19)), XON 
(CHR$(17)), and a loss of carrier. 

Next month we'll be searching the 
message board, so watch for the BBS 
Express as it picks up steam. ■ 

The BBS Express, 80 Micro '5 bulle- 
tin board system, is open 24 hours a 
day. Call us at 603-924-6985 to see the 
finished product. UART parameters 
are 300 baud, seven bit words, one 
stop bit, and even parity. 

You can reach J. Stewart Schneider 
and Charles E. Bo wen either through 
their bulletin board at 606-739-6088 or 
c/o Saturday Software, P.O. Box 404, 
Catlettsburg,KY41J29. 



listing 2 continued 

4895 IF ( (INP(&HE8)AND32)=32) AND NOTWZ THEN 2630 

4900 LINEINPUT#3,A$ 

4910 CR=INSTR(A$,CHRS(141)) :IFCR>0 THEN MID$ ( A$ ,CR , 1) =CHR$ ( 13) :GOT 

04910 

4920 IF INSTR(CM$,".IMG")=0 THEN Z=USR2 (VARPTR( A$) ) 

4930 FOR C=l TO LEN(A$) 

4940 PRINT MID$(A$,C,1) ; 

4950 IF INKEY$=CHR$(16) THEN 5020 

4960 IF INKEYSOCHRS(19) THEN 5010 

4970 IF INKEYS=CHR$(17) THEN 5010 

4980 IF WZ THEN 4970 

4990 IF (INPUH0E8) AND 32) =0 THEN 4970 

5000 GOTO2630 

5010 NEXT:GOTO4880 

5020 PRINT CHR$( 17) :CL0SE3: PRINT: RETURN 

5030 LPRINT-Message #";N;" Sec. ";S6$;" ";SS(VAL(S6$) +1) 

5040 LPRINT'To: ";T1$; 

5050 IF (ASC(S7$) AND 16) =16 THEN LPRINT" (X) " ; 

5060 IF (ASC(S7S) AND 32) =32 THEN LPRINT" (P)"; 

5070 LPRINT" " 

5080 LPRINT'From: ";F1$ 

5090 LPRINT"Subject: ";S1$ 

5100 LPRINT"Date/Time: ";T2$:LPRINT LEFT$(S$,SV) 

5110 IF SF THEN RETURN 

5120 OPEN"I",3,F2S+"/BBS"+DD$ 

5130 POKE VW,80:POKE RE, 80 

5140 IF E0F(3) THEN POKE VW,SV: GOTO 5020 

5150 LINEINPUT#3,AS 

5160 CR»INSTR(A$,CHR$(141) ) :IF CR>0 THEN MID$ (A$ ,CR, 1) =CHR$ ( 13) :GO 

TO 5160 

5170 Z-USR2(VARPTR(A$) ) 

5180 LPRINT A$;:GOTO 5140 
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BUY 




Single Sided 
Double Density 



Soft sector 5 1 A» " flexible diskettes 




Double Sided 
Double Densty 



"Complete with hub reinforcing rings, 

Tyvek sleeves, color coded user 

labels, and write protect tabs. 

Quality you expect 
at a price you don't. 

Proven quality at a great price. BECK offers 
you a full satisfaction money- back guaran- 
tee - you can't lose! If you like the quality of 
3M, Dysan. Verbatim, et al, you'll like BECK 

• Satisfaction. Money- Back Guarantee 

• 100% Certified. 100% Error-Free 

• Full 7-Year Warranty 

• Tested and Retested 21 Times to 42 Rigid 
Specifications 

• Meets or Exceeds ANSI Standards 

For IBM. Apple. TRS, and 97% of popular 
computers. 

Order Toll Free 1-800-232-5634. 

Available m 25- Pack only plus freight 

Bulk product inquiries welcome 



COD'S CASH ONLY 
Corp Accts Welcome 



Order Now Toll Free 
Door to Door in 48 hrs. 

flEOf 



(In New Hampshire call 924 3821 ) 
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COMPLETE HARD DRIVE $849 



COMPLETE PRIMARY DRIVES MODEL III IV AND IVP 

TRS-80 Model lll/IV 5 Meg Primary . . $1095.00 
TRS-80 Model lll/IV 10 Meg Primary. $1395.00 
TRS-80 Model lll/IV 15 Meg Primary. $1695.00 
TRS-80 Model lll/IV 32 Meg Primary. $2495.00 

MODEL I & LNW 

TRS-80 Model I 5 Meg Primary $1 145.00 

TRS-80 Model I 10 Meg Primary $1445.00 

TRS-80 Model I 15 Meg Primary $1745.00 

TRS-80 Model I 32 Meg Primary $2545.00 

COMPLETE SYSTEM FEATURES 

120 DAY WARRANTY 

SWITCH SELECTABLE HOST 

HD POWER SUPPLY 

ERROR CHECKING AND CORRECTING 

HD COOLING FAN 

SIZE 8-1/4" X 6-1 '2" X 13" 

ALL DRIVES RATED AFTER FORMAT 

COMPLETE READY TO PLUG IN (JUST ADD YOUR DOS) 

SUPPORTS NEWDOS 80 V2.5, DOSPLUS 3.4F, 4.0A, 3.5E, IV 

RIGID. LDOS, AND TRSDOS 6.0. DRIVERS ARE NOT 

INCLUDED IN THE PRICE OF THE HARD DRIVE. 




SECONDARY DRIVES 



iREADY TO PLUG INTO YOUR PRIMARY DRIVE] 

5 Meg Secondary Drive $695.00 

10 Meg Secondary Drive . . . $995.00 
15 Meg Secondary Drive . . $1295.00 
32 Meg Secondary Drive . . $2095.00 



FIVE MEGABYTE 
HARD DRIVE 



$849. 



HDS MULTIPLEXER $995. 





Vet. your eyes are not deceiving you Hard Drive Specialist 15 no* ready to release* second version 
u' their Model lll/IV Hard Drive to the general public The MDSn is the same quality as our other 
a< ves and includes software drivers tor DOSPLUS 3 5 and IV SO WHAT DID WE LEAVE OFF'' 
TneHDSH drive is not expandable with any of our other HDS Products Thatsit 1 The same reliability 
anc quality tor hundreds less 



~..** MW!JV m 



ALLOWS USEAGE OF UP TO 4 MODEL III OR IV SYSTEMS USING DOSPLUS OR 
LDOS ON A HDSI HARD DRIVE. INCLUDES MASTER CONTROL UNIT. HOST 
ADAPTERS FOR 2 COMPUTERS, AND 40 FEET OF CABLE. EACH ADDITIONAL 
HOST ADAPTER ADD $150. EACH ADDITIONAL FOOT OF CABLE ADD $1. UP 
TO 100 FEET PER COMPUTER. 



MODEL 3/4 BOOT ROM $39.95 

/ALLOWS YOU TO BOOT DIRECTLY FROM YOUR HARD DRIVE 
FOR DOSPLUS 



Hard Drive Software 



Dosplus 3 4f (Model 1 omyt 

Dosplus 3 Se (Model I drivers tor 3 5) 
Dosplus 3 51 (Model 3 4 drivers lor 3 5) 
Dosplus IVI iModei 4 drivers tor IV) 

Dosplus 4 0» (Model 3'4 only) 

LDOS (tm) 5 t x Drivers (Model 13 4) 
TRSDOS 6 (tm) Drivers (Model 4 only) 
Newdos'80 Version ?5 (Model ' 3 4) 



$99 95 
$59 95 
$59 95 
$59 95 
$99 95 
$59 95 
$59 95 
$199 00 



Fully compatible Hard Drives for your PC 

10 MEGABYTE EXTERNAL PRIMARY DRIVE $1395.00 

15 MEGABYTE EXTERNAL PRIMARY DRIVE $1695.00 

32 MEGABYTE EXTERNAL PRIMARY DRIVE $2495.00 

itulty assembled, tasted and lormaned to run under DOS 2 or 2.1) 




Hard Drive Specialist 

order line 
1-800-23 1*671 



162060 Hickory Knoll 
Houston. Tanas 77058 



Dealer inquiries miffed 



Model 3/4 Upgrade Kits 



All Model 3/4 upgrade kits come with Tandem drives switching power Supply all 
necessary cables and hardware and manuals All kits come with a 120 day warranty 
Memory Kits and sound boards are not included and may be purchased separately 

The No Drive Upgrade Kit (everything but the drives $215.00 

One TM 100-1 single sided. 40 track drive kit $379 00 

Two TM100-1. single sided. 40 track drive kit $549 00 

One TM 100-2. double sided. 40 track drive kit $459 00 

Two TM100-2. double sided. 40 track drive kit $699 00 



TANDON (FULL SIZE) Disk Drives 

Tandon TM100-1 single sided. 40 track, bare $169 95 

Tandon TM100-2 double sided. 40 track, bare $239 95 

TANOON (Half-Height) 

TM50-1 20 ms step rate, 40 track, single sided, bare $149 95 

TM-50-1 6 ms step rate. 40 track, single sided, bare $169 .95 

TM50-2 6 ms step rate. 40 track, double sided, bare $219 00 

TM65-2 40 track, double sided, bare $249 00 

Single 5 1/4" power supply and case with extender $59 95 

Double 5 1/4" power supply and case with extender $84 95 

Double 5 1/4" Half Height case with extender $69 95 

2 Drive cable for 5 1/4" Drives (configured add 5 00) $29 95 

4 Drive cable for 5 1/4" Drives (configured add 8 00) $39 95 

6" extender cable for 5 1/4" Drives $14 95 

SAVE $10.00 PER CASE WITH THE PURCHASE OF A DISK DRIVE 

Model ill/4 RS232 Kit $69.95 

lincludes all internal cables Model 3'4 Onlyi 



MODEL III TO MODEL 4 
UPGRADE $750. 

Converts your Model III into a Model 4 (except for 
cabinet and disk drives). Includes new keyboard, 64K 
RAM. sound, and free installation (required). Ship us 
any working Model III, even if it's not all factory equip- 
ment, and get back a Model 4. in your case 



Model 1/3/4 Accessories 

16K memory upgrade kit (200 ns. Model 1/3) $14 95 

64K memory upgrade kit (memory only. Model 4) . . $62.95 
64K memory upgrade kit (memory + PAL Chip . . . $79.95 
Model 4 Sound Upgrade Kit $19.95 

Green Phosphor CRT KIT $89.95 

lanti-glare slow or last decay. Model 1/3/4) 

Compukit Drive Controller bosrd . . . $99.00 

Model 3/4 ONLY 



NEW HDS FLOPPY DRIVE 
CONTROLLER CARD FOR THE 
COLOR COMPUTER 

• GOLD PLATED EDGE CARDS 

• DUAL SELECTABLE ROM SOCKETS 

• NO POTS TO ADJUST 

• COMPATIBLE WITH COCO I & II 

• 120 DAY WARRANTY 

• DOUBLE AND SINGLE DENSITY 

• FULLY SOCKETED BOARD 

REDUCE YOUR I/O ERRORS WITH THE NEW HARD DRIVE 
SPECIALIST FLOPPY DRIVE CONTROLLER FOR THE COLOR 
COMPUTER GOLD EDGE CAR0 CONNECTORS AND THE 
ABSENCE OF POTENTIOMETERS MAKE THIS THE BEST 
BOARD AVAILABLE TO DATE SOLD WITH AND WITHOUT 
ROM (Read Only Memory) SO THAT THOSE WHO WANT TO 
ADO THEIR OWN VERSION CAN 



COLOR COMPUTER DRIVE $319. 

COLOR COMPUTER DRIVE 1 $189. 

COLOR COMPUTER DRIVE AND 1 $479. 

HDS COCO DRIVE CONTROLLER CARD WITH ROM $139. 

HDS COCO DRIVE CONTROLLER CARD WITHOUT ROM $119. 

TEAC DISK DRIVES 

TEAC 55A SS/OD 40 TRACK HALF HEIGHT BARE $139. 

55A WITH CASE AND POWER SUPPLY $189. 

TEAC 558 DS/ DD 40 TRACK HALF HEIGHT BARE $169. 

55B WITH CASE AND POWER SUPPLY $239 

Model 1/3/4 Software 

Dosplus 3.5 (Model 1 SD/DD or Model 3/4) $9900 

Dosplus IV (Model 4 only) $99 00 

Newdos 80 Version 2.0 (Model 1/3/4) $149.00 

Mscript (Model 1/3/4) $79 00 

Electric Webster (Model 1/3/4) $129.00 

Microterm (Model 1/3/4, IBM PC) $75.00 

Compukit Doctor (Model 1/3/4) $29 95 

Super Utility 3 1a (Model 1/3/4) $75 00 

Printers & Accessories Dot-Matrix 

Citoh Prownter 8510. 120 cps. parallel $349 00 

C Itoh Prowriter 1550. 120 cps. parallel. 15" $569.00 

C Itoh A-10 Letter Quality. 22 cps, parallel, 15" $549.00 

Model I, III. IV, IVP Printer Cable $25.95 

Quadram Microfazer Printer Buffer. 8K (upgradable) $149.00 

Quadram Microfazer Printer Buffer, 64K $219.00 

Quadram Microfazer Printer Buffer. 128K $299.00 

Color Computer Accessories 

Wico Adapter for C0C0 (Atari type joystick to C0C0) $17.95 

HJL Keyboard (specify C0C0 board rev.) $79.95 

Keytronic Keyboard $89 95 

Micronix Keyboard (specify C0C0 board rev.) $79.95 

64K RAM Kit (specify C0C0 board rev.) $62.95 

PBH Parallel Printer Adapter $74.95 



HARD DRIVt SPECIALIST 



Ordering Information 

We accept Visa. Mastercard, Wire Transfers, and Certified checks tor 

quickest snipping Orders received on personal checks are held 



Dealer inquiries invited 

162060 Hickory Knoll. Houston. Texas 77059 

Order Line 

1-800-231-6671 

Local Sales and Service Line 

1-713-480-6000 



BASIC TAKES / by Richard Ramella 



Error Messages: 
Learning from Your Mistakes 



You're keying in a 2,000-line pro- 
gram that the author says can 
mow your lawn. You type in a line, 
4000 S-L, then type in RUN 4000 and 
press the enter key to check the line. 

Deep in ROM an alarm goes off, in- 
terrupting a game of poker between 
OM and SN, two clerks in the Error 
Codes Bureau. 

"What is it with the human," gripes 
SN. "Is he typing with his elbows?" 
SN takes the elevator up to the com- 
puter screen and flashes the message 
?SN ERROR IN 4000. Before return- 
ing to the game, SN records the code 
number of the error and the number 
of the line where it happened, in case 
the human is interested. 

Outside the computer, you scowl at 
the error message, then fix the line be- 
fore continuing. You meant to type 
4000S = L. 

You made a mistake, and the com- 
puter's error message helped you cor- 
rect it. It told you the type of mistake 
you made and its location in the pro- 
gram. All you had to do was study the 
miscreated line for a moment and 
fix it. 

The definitions of your computer's 
error codes appear in your owner's 
manual. This month I'll examine some 
common Basic error codes. 

NF and SN Errors 

An NF error means your program 
has a Next statement without a corre- 
sponding For statement. Type NEXT 
and press the enter key. The computer 
displays the message ?NF ERROR. 

For... Next is a two-statement 
command that creates a program 
loop. The statements may be two lines 
apart or hundreds of lines apart. 
Here's an example: 

100 for a = 1 TO 10 
110 PRINT A 
120 NEXT A 
130 END 




Line 100 tells the computer to loop 
10 times through line 120. Each time, 
variable A grows by one. Now delete 
line 100 and run the program. This 
time the message ?NF IN 120 appears. 
Here's a more complex example: 

100 FOR X = 1 TO 10 
110 FOR Y = l TO 3 
120 PRINT X;Y 
130 NEXT X;Y 
140 END 

The program generates an NF error 
after it prints the number 10. The Y 
For... Next loop must be "nested" 
within the X For. . .Next loop for the 
program to execute properly. The X 
and Y variables are in the wrong order 
in line 130. 

If you include a For statement with- 
out a Next statement in your program, 
the program runs its course as though 
the For statement weren't there. 

A syntax (SN) error commonly oc- 
curs when you're typing in a program 
listing. In Basic, correct syntax is the 
form in which statements must appear 
to be meaningful to the computer. The 
computer recognizes incorrect Basic 
syntax and returns an SN error. 



Type in BARNACLE and hit the 
enter key. Any word that has no 
meaning in Basic results in a syntax 
error, including a misspelled Basic 
word. 

Type A$(l) = "BASIC": PRINT 
LEN(A$(1) and hit the enter key. You 
expect the computer to return the 
number of characters in the string 
A$(l). Because a parenthesis is miss- 
ing, however, you'll get a syntax error. 
All commands and statements must 
have matched sets of parentheses. 

This error becomes tougher to rec- 
ognize in complex strings such as 
A$ = CHR$(INT(SQR( 1000)) + ASC 
("M")-3). To prevent these errors I 
count the opening parentheses from 
left to right, then count the closing 
parentheses from right to left. 

The line INPUT "ENTER A 
NUMBER", A contains a punctua- 
tion error. A semicolon should sepa- 
rate the input prompt from variable 



The Key Box 

Models I, in, 4, and 100 
Basic 
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A, not a comma. The line FOR$ = 
"CHECKING" results in a syntax er- 
ror because it uses the Basic reserved 
word For as a string variable. 

Other examples of this type of error 
include TOMES (contains the reserved 
word TO), AUTOMOBILES (con- 
tains AUTO and TO), and WITH- 
OUT (contains OUT). 

No string or number variable can 
include Basic reserved words. A list 
of reserved words appears in your 
manual. 

RG, OD, and FC Errors 

RG stands for Return without GO- 
SUB. Type in and run the following 
listing: 

100 FOR X = 1 TO 3 
1 10 GOSUB 1000 
120 NEXT X 
1000 PRINT X 
1010 RETURN 

This program loops three times 
through lines 100-120. From line 1 10, 
control goes to line 1000, where the 
program prints the value of X. Line 
1010 then returns the program to the 
loop in lines 110-120. 

The program runs correctly in the 
loop, but falls through to line 1010 
without reading a GOSUB. It prints 
the value of X again, then finds a 
Return without a previous GOSUB. 
One solution is to add a line 130 with 
an End statement. 

An RG error also occurs if you type 
in GOTO when you meant to type in a 
GOSUB. 

An ?OD ERROR on your screen is 
an out-of-data error. The computer 
assigns values stored in data state- 
ments in the program or on tape or 
disk. It signals an OD error if the pro- 
gram tells it to look for data that 
doesn't exist. 

Type in the following program: 

100 REM • DATA LIST 

110CLS 

120 DATA 1,2,3,4,5 

130 DIM A(6) 

140 FOR X = 1 TO 6 

150 READ B(X) 

160 NEXT X 

170 END 

An OD error occurs in line 150 
when the program tries to read in a 
sixth value. Only five items appear in 
the data statement in line 120, yet the 
program dimensions a six-value array 
and starts a loop to read in six values. 

FC is an illegal function call. This 



An OM error means 

out of memory. 

This happens when 

you type in a program 

that's too long 

for your system 

to store in RAM. 



error occurs when the program tells 
the computer to do something outside 
the range of its capability. Look at the 
following statements: 

100A = SQR(-1) 
120B = LOG(0) 
130 PRINT AS<-1) 

It is impossible to square a negative 
or get a Log of zero, so an FC error 
occurs in lines 100 and 1 10. An FC er- 
ror results in line 130 because you 
can't have a negative array. 

Values change during the run of a 
program through random number 
generators and user input. For this 
reason a program line can work dur- 
ing one run and result in an FC error 
in the next. 

Try running the following listing: 

100 REM • FC ERROR 

110CLS 

120X = 38 

130 PRINT @X:'Z"; 

140X = X-1 

150 GOTO 130 

When you run this program, a Z 
races from right to left on the screen 
and an FC error occurs in line 130. 
The program tells the computer to 
print at a nonexistent screen position. 

The Models I, III, and 4 can't print 
at screen positions higher than 1023. 
The Model 100 can print up to posi- 
tion 319. This program quickly goes 
below the first position. 

OV, OM, UL, and BS Errors 

The OV, or overflow, error occurs 
when a number is too big or too small 
for the computer to handle. Running 
the statement PRINT 100A100 results 
in an OV error. To see how big or how 
small a number your computer can 
handle, type in and run the following 
program: 



100 REM • OV ERROR 

110 CLEAR 500 

120A$ = "Hr 

|30A = VAL(A$) 

140 PRINT LEN(AS)- 1":"A 

150 AS = AS +"0" 

160 GOTO 130 

170 END 

This program generates an OV er- 
ror. The figure to the screen left is the 
number of zeros in the number when 
the error occurs. To find the negative 
limits, change line 120 to AS = 
" - 10" and run the program. 

An OM error means out of memo- 
ry. This happens when you type in a 
program that's too long for your sys- 
tem to store in RAM. Your computer 
requires a certain amount of memory 
overhead to run programs, so the last 
bit of memory runs out when you run 
a program. 

In such a case, the OM error occurs 
on the line where memory runs out. 
The computer displays the amount of 
free memory when you type PRINT 
FRE(0) and hit the enter key. 

Short programs can produce OM 
errors. For example, 100 CLEAR 
100000 tells the computer to clear 
100,000 bytes to store strings. Since 
your system has under 100K of RAM 
available, an OM error results. 

In DIM A( 1000000) the computer 
attempts to dimension an array that 
holds one million pieces of data. 
Again, the computer lacks enough 
memory and returns an OM error. 

In rare cases, complex nested 
branches involving GOTO, GOSUB, 
and For. . .Next loops can yield OM 
errors. If an OM error message flashes 
for no apparent reason, one of these 
situations might be the problem. 

A UL error is an undefined line. 
Type in NEW, hit the enter key, then 
type in GOTO 1000. The computer 
displays a UL error message because 
no line 1000 exists. The same can hap- 
pen when a program runs. The GOTO 
and GOSUB commands must have 
objective lines. 

BS is a bad subscript range. This 
happens when you attempt to assign a 
value to an array variable that's be- 
yond the range you set. Here's an ex- 
ample: 

100 REM • BS ERROR 
110DLMA(3) 
120A(4) = 6 
130 END 
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DD, /O, ID, and TM Errors 

A DD error, or redimensioned ar- 
ray, results when you try to redi- 
mension an array in a program. For 
example: 

100 REM * DD ERROR 
110DIMA(3) 
120 DIM A(4) 
130 END 

Line 120 produces the DD error. 
This happens whether the DIM state- 
ments are two lines or 200 lines apart. 
To avoid this problem, it's good prac- 
tice to put all DIM statements at the 
beginning of your programs. 

/0 is a division by zero error. You 
probably know that you can't divide 
by zero, but a variable may reach a 
zero value through random number 
generators or user input. 

ID stands for illegal direct. Type 
INPUT = "FRED" and press the en- 
ter key. An ID error occurs because 
the input form is wrong. 

TM is a type mismatch error. You 
can't assign a string to a numerical val- 
ue (A$ = 5), nor can you assign a nu- 
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meric variable to string characters, as 
in A = "Sam". 

The statement A = "Sam" is cor- 
rect, however, if the program contains 
a DEFSTR A statement in a previous 
line (this defines A as a string). This 
technique lets you write A instead of 
A$, but can lead to confusing errors. 

If the program defines A as a string, 
any variable starting with A is a string. 

OS, LS, ST, CN, 
And MO Errors 

An OS, or out-of-string error, re- 
sults when the computer runs out of 
string storage space. Turn off your 
computer, then turn it on and type in 
PRINT FRE(""). The computer dis- 
plays the maximum number of char- 
acters that it can store. 

To increase string storage capacity, 
include a Gear statement for the 
amount of string space you need. Typ- 
ing CLEAR 500 gives you 500 bytes of 
string space, enough for roughly 500 
characters. 

Gearing string space uses memory, 
but you must clear enough bytes to 
store all string values used in your pro- 
gram. Here is an example program: 

100 REM * OS ERROR 

110 CLEAR 500 

120 FOR X = TO 10 

130 A$(X) = STRING$(255,65) 

140 PRINT A$(X) 

150 NEXT 

160 END 

This program is supposed to print 
the letter A (the ASCII value of 65) 
255 times in line 140, then loop back 
and print the line 10 more times. Since 
the program clears 500 bytes and re- 
quires 25,500 bytes of string space, an 
OS error results. 

An LS (long string) error occurs 
when a string variable is longer than 
255 characters. See if you can find 



where this listing creates an LS error: 

100 REM * LS ERROR 

110CLS 

120 CLEAR 1000 

130 FOR X ■ 1 TO 1000 

140A$ = A$ + "X" 

150 PRINT X "- "A$ 

160 NEXT 

170 END 

This error can also occur if you add 
(concatenate) two or more strings 
whose total length exceeds 255 char- 
acters. 

An ST error results when a string 
formula is too complex. This is 
uncommon, however. If you get an ST 
error, it will likely point you to a line 
containing an excessively long string 
manipulation. 

Although the string may be syntac- 
tically correct, the manipulation is too 
long for the computer to handle. 
When this happens, break up the work 
into several lines. 

A CN error means the program 
can't continue. Type in NEW, press 
the enter key, then type in CONT (for 
continue). A CN error results because 
you don't have a program running. 

This error also happens when you 
break into a running program, edit a 
line, and attempt to continue. The so- 
lution is usually to run the program 
again. 

MO stands for missing operand. 
This error occurs when you have left 
something out of a mathematical 
statement. The following statements 
all produce MO errors: 

100FORX=1TO 

nox = 

120 PRINT 2* 
130 PRINT 4/ 

These are some of the more com- 
mon error messages that you will en- 
counter when programming in Basic. 
Others include error messages pertain- 
ing to disk systems, or deal with error 
recovery routines that you can build 
into your programs. 

Preventing errors goes beyond sim- 
ple recognition. It involves program- 
ming in error-trapping routines (which 
themselves create beneficient errors), 
and using programming techniques 
that eliminate anticipated errors. 

Coming next month: pixel graphics. I 

Contact Richard Ramella at 1493 
Mountain View Ave., Chico, CA 
95926. 



LETTER-WRITER 

'383 'WORKS* 1 for YOU 




THE " BEST " SOFTWARE IS GUARANTEED! 
TRT IT and LIKE IT, or 6ET a REFUND 

The machine code L-M is "A" rated by 
Hlinbich'i "SOFTWARE REPORTS " for : 

EASY USE, DOCUMENTATION, FEATURES 

- SCREEN DISPLAYED >•■« is PRINTING. 

- UlC ANY PRINTER • GRAPHICS options. 

- FULL PRINTING CONTROLS: Columns, 
lines, pages, FOR" L ETTERS/ LABEL S , 
LEGALpaperLINENUNBERS*NASSNAILER. 

- FULL TYPING CONTROLS: Copy/Hove/ 
Center/ Insert /De I ete--Characters/ 
Words'Lines'Blocks/Coljmns/F^les. 

- *0VER 50 ASCII Coda/PHRASE typing 
insertions setup/stored by users. 

- "WARN START and prt-ttt PAGE SAVE. 

- Split screen typing line, sat old 
and ne« version * cancel changes. 

- Un»od 1 f 1 ed N I see/pr<nt lower case. 

- INTERCRATED bookkeeping ADD / SUB. 

- EASY ARROW KEYS CURSER moves: Up/ 
Down/Right/Left Start/End-Lines/ 
coluans/page and WORD WRAP control. 

- ONE NODE: Typa/Edit/Dalttt without 
switchingaodes-NO TRAINING PERIOD. 



WE PAY TAX/USA SHIPPING. Try a L-W 
fo r 3 aionths. Like it or return it for 
a refund, less our S/H costs o* S3. 50. 

Models I, III/IV: TAPE 16K 123.99 
DISK 32K ( • Extra Features ) S37.99 

VERBATIM SS/DD (Bag of 10 disks) $22.9° 



ASTRO-STAR ENTERPRISES 
5905 Stone Hill Dr. Information: 
Hoc kiln, CA 95677 (916) 624-3709 

Orders: 1-800-622-4070 lit. AS jC 
in IL 1-800-942-7317 E«t. AS 3E 



N€UU 

Ge neology 

Program 

(for 48 K Model III/4 Two Disk Systems) 
HOLDS 350 R€CORDS P€fl FIL€ 

•*V Records filed by name key 

* Unlimited records with multiple files 

* Allows changes in spelling of surnames 

* Shipped on premium diskette 

Comprehensive Documentation 

Five Reports : full Alpha Printout. 

Family Tree, Paternal Line. Maternal 

Line, Descendent Line 

*49 95 us 

Send Chech or Money Order to 

MliVMR, INC 

1 16 Baywood Drive : Bilori, MS 39532 

^317 

Free Shipping for U.S. Orders 

Mississippi Residents add 6% Soles Tar 

Foreign Orders add $5 Shipping and Handling 




DRV80 



Allows Model III programs to 
use 80 x 24 mode on a Model IV 

Modifies PRINT @. TAB, SET, 

etc to access entire 80 x 24 

screen 

Permits PEEK and POKE to all 

1920 screen locations 

Adds SOUND and 10 other BASIC 

enhancements 

Integrates into any DOS 

Functions with both BASIC and 

machine language programs 

Allows intermixing of 80x24 
and 64 x 16 modes 

ONLY $39.95 



Call about Model III 80x24 
upgrade 

The Logical Place 

Dealers PO Box 308 

invited Keyser, WV 26726 

(301) 786-5013 



An Easy Way To Organize 



Learn to write your own data base manager 



INTtW 

TRSSO 

DATA FILES 




/ntroduction to TRS-80 Data Files is a 
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base management program. Your pro- 
gram will help you organize any data 
you need to keep— whether it's income 
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business. You learn by doing it your- 
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random access files— how they 
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PASCALCULATIONS / by Bruce Powel Douglass 



Pascal's Input 
And Output Files 



So far, the programs I've covered 
have read data from the keyboard 
only and written it to the computer 
screen only. Pascal wouldn't be a very 
useful language if that were all it could 
do. In fact, Pascal's (especially Alcor 
Pascal's) input/output (I/O) capabili- 
ties are much more versatile than 
Basic's. 

The Ins and Outs of Pascal 

A Pascal program normally reads 
its input from a standard file named 
Input and writes to a standard file 
named Output. When you run a com- 
piled program, you must answer the 
prompts: 

INPUT = 

OUTPUT = 

with the names of the files you want 
used as the standard files. If you press 
the enter key without typing in a file 
name, the program uses the default 
values, the keyboard and screen. 

You could, instead, type in the 
name of a file stored on disk for the in- 
put file and a legal file name for the 
output file. For example, if you type in 
SOURCE.TXT for the input file and 
OUTPUT.TXT for the output file, 
then every time the program executes a 
Read or READLN statement, the data 
comes from the file named Source 
.TXT; likewise, any output from 
Write or WRITELN statements goes 
to the file named Output.TXT. 

Program Listing 1 shows how this 
works. The program reads strings 
from the input file and writes them to 
the output file. Compile the program 
and run it; for input, type in the name 
of an ASCII text file on disk (with 
character data only, no special codes). 
For output, type in another valid 
TRSDOS file name. 

The program copies the input file to 
the output file. EOF is a Pascal func- 
tion that returns a Boolean value; true 




if the program has read the last byte of 
the file, false if not. The While loop 
executes until the program reads all 
the strings in the input file and writes 
them to the output file. 

In programs that don't use the stan- 
dard I/O procedures (read, READ- 
LN, write, and WRITELN), you 
might not want the prompt for input 
and output file names. To leave the 
standard files undeclared, begin your 
program with the compiler option 
j$NO INOUT} or (*$NO INOUT*). 
You can't use the standard I/O state- 
ments with this compiler option unless 
the program itself opens files — I'll 
discuss how to do that later in this 
column. 

You can use the message procedure 
to send output to the screen regardless 
of the standard output file, as in this 
sample program: 

($NO INOUT) 
program test; 
begin 

messageOThis goes to the screen.'); 
end. 



Name That Hie 

You'll often need files other than 
the standard input and output files. 
Then you use a file identifier in your 
program to refer to the file; the identi- 
fier shouldn't have the same name as 
the name of the file on disk. You must 
declare the file identifier as you would 
any other variable. For example: 

\ar 
outFile: file of char; 
outFile2: file of integer; 

Pascal has a special file type called 
text. The standard input and output 
files are text files. When declaring a 
text file, you don't have to type in 
FILE OF TEXT, because the type 
is predefined. To declare a text file 
called inFile, for example, you simply 
type in: 

var 
inFile: text; 

Although a file identifier refers to 
only one disk file at a time, over the 
course of a program's execution it 
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Every Z80 assembly-language 
programmer needs this book. 




Programming in assembly language requires good 
tools. TRS-80IZ80 Assembly Language Library, a com- 
plete reference book on TRS-80 Model I assembly 
language, is the best tool you can find. In over 
300 pages, 45 figures, and 75 program listings, author 
Craig A. Lindley explains the details of Model I hard- 
ware and software and shows you how to write pro- 
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• how to perform disk input/output 
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Many of the programs also run on the Model III, and 
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those that do not require only minor modification. 
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and programs that run on any Z80-based system. No 
matter what Z80 computer you program, this book has 
something for you. 

It's a book that's designed to be used. The text is set 
in large type, and the book is bound in an 8Vi- x 11-inch 
easel-backed binder that stands up next to your com- 
puter. So there's no squinting at tiny type and fighting 
to keep the book open. 

The whole package— book, disks, and binder — is 
yours by mail for the unbelievable price of only 
$34.97. And if you charge it, you can even call toll-free 
to order. 

TRS-80IZ80 Assembly Language Library. It's the 
assembly-language book for the '80s. 

'Disks do not contain a disk operating system: two disk drives or a 
disk copy utility are required to transfer the files. 
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PASCALCULATIONS 



Program Listing 1. Simple input and output 
program. 

program copyASCIIFile; 
var 

a: string; 
begin 

while not eof( INPUT) do 

begin 

readln(a) ; 

writeln (a) ; 

end; 
end. 



might refer to several different disk 
files. 

The Reset procedure opens files 
from which the program reads; the 
Rewrite procedure opens files to which 
the program writes. The Close proce- 
dure closes a file. The argument for 
these procedures is the file identifier. 

The Read, READLN, Write, and 
WRITELN procedures all have an 



Program Listing 2. Writing data to a disk file. 

program dataOutput; 
var 

data: array [1..20] of real; 
i: integer; 
outFile: text; 
begin 

{ enter data from keyboard } 
for i:=* 1 to 20 do 
begin 

write('Enter data point ',i:l,': ') 
readln(data[i] ) ; 
end; 
{ now open the output file } 
rewrite (outFile) ; 

{ now send the output to this file } 
for i:= 1 to 20 do 

writeln(outFile,data|i] :10:5) ; 
close(outFile) ; 
end. 



Program Listing 3. Using the SETACNM procedure. 

program dataOutput; 
var 

data: array [1..20] of real; 
i: integer; 
outFile: text; 
procedure setAcnm(var filelD: text; name: string) 
external; 
begin { program body } 

{ enter data from keyboard ) 
for i:« 1 to 20 do 
begin 

write ('Enter data point ',i:l/': '); 
readln(data[i] ) ; 
end; 
{ now open the output file } 
setAcnmfoutFile, bldstr ( 'object/txt' ) ) ; 
rewrite(outFile) ; 

{ now send the output to the file OBJECT/TXT } 
for i:= 1 to 20 do 

writeln (outFile, data [i] :10:5) ; 
close(outFile) ; 
end. 



Program Listing 4. Printing a binary file as a text file. 

program reallnTextOut; 
var 

realFile: file of real; 

printer: text; 

value: real; 
procedure setAcnm(var p: text; s: string); external; 
begin 

{ open file to read } 

write ('Enter the name of the FILE OF REAL to read: ') 

reset (realFile) ; 

{ open printer for output } 

setAcnm (printer , bldstr ( ■ :L' ) ) ; 

rewrite(printer) ; 

{ now copy values from the file of reals to the 

printer} 

while not eof (readFile) do 
begin 

read(readFile,value) ; 
writeln(value:10:6) ; 
end; 
end. 



optional file parameter that appears 
before any data you want written or 
variables you want read. If the first 
parameter isn't a file type, the default 
value is the standard input file (if you 
want the data read) or the standard 
output file (if you want the data writ- 
ten). If the first parameter is a file type 
identifier, then that file is used for 
the I/O. For example: the state- 
ment WRITELN(data); is the same 
as WRITELN(output.data); while 
WRITELN(resulting,data); sends the 
value of the file named Data to the file 
named Resulting. 

A file identifier isn't bound to a spe- 
cific file until you open the file using 
the Reset or Rewrite procedures. The 
Close procedure detaches a file identi- 
fier from a specific file. So, when a 
program executes a Reset or Rewrite 
statement, it then pauses to prompt 
for the file name (I'll discuss excep- 
tions below). 

For example, after executing the 
statement RESET(inFile), the pro- 
gram prompts you for a new value for 
inFile. If you press the enter key with- 
out typing in a file name, the program 
uses the default input or output file. If 
you type in the file name Exam- 
ple/DAT, the program refers to the 
disk file Example/DAT every time it 
encounters the identifier inFile. Pro- 
gram Listing 2 illustrates these points. 

The Tie That Binds 

Sometimes it isn't convenient to 
have the program stop and prompt 
you for a file name. Alcor Pascal pro- 
vides a way of linking a file name to a 
file identifier from within the pro- 
gram: the SETACNM procedure. To 
use this procedure, you must declare it 
as an external procedure before the 
main body of the program begins. The 
declaration looks like this: 

procedure setAcnm(var a: <fileType>;b: string); 
external; 

You more advanced Pascalers 
might see a problem in using the SET- 
ACNM procedure to bind file names 
to file identifiers of different types: 
Pascal's strong file typing. If the first 
parameter of the SETACNM proce- 
dure is a text file, and you want to use 
an integer-type file, the program re- 
ports an error, since the types of the 
formal parameter and the procedure 
invocation don't match. 

There's a way around this problem. 
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A file identifier isn *t 
bound to a specific file 

until you open the 
file using the Reset or 

Rewrite procedures. 



Alcor Pascal thoughtfully provides a 
type transfer operator that lets you by- 
pass Pascal's type checking. The oper- 
ator's symbol is two colons (::). Use 
this operator with caution. If the sizes 
of the two types aren't identical, nasty 
things can occur, like overwriting 
other variables or part of your pro- 
gram. 

However, since Alcor Pascal's file 
buffers are all the same size, you can 
safely transfer file types in this case. 
The syntax for a type transfer is 
<variable>::<expected type>. For ex- 
ample, if inFile is a real-type file and 
the SETACNM procedure calls for 
the first parameter to be a text file, 
then the statement: 

setAcnm(inFile, name); 

generates an error because the first pa- 
rameter isn't the correct file type. 
However, you can use: 

setAcnm(inFiIe::texl, name); 

to temporarily give inFile a new file 
type, text. The procedure binds the 
value of the file called Name to the file 
identifier inFile. If Name is a string file 
and has the value Source/TXT, then 
the file identifier inFile refers to the 
disk file Source.TXT. 

Program Listing 3 is a modification 
of Listing 2; it eliminates prompts for 
file names after the Rewrite proce- 
dure. The second parameter of the 
SETACNM procedure must be a 
string-type variable, because a string 
constant has an implied type of 
packed array of character. The 
predefined Alcor Pascal procedure 
BLDSTR lets you create a string type 
from a string constant. 

Binary Files 

Input and output with text files 
change the internal storage format of 
Pascal's simple data types to ASCII 
characters. For example, Pascal stores 
a real-type value in memory in binary 
floating-point form, but when a pro- 



Program Listing 5. Storing customer records as binary files. 

program cIO; 
type 

cRec » record 

name: packed array [1..20] of char; 

age: .'..95; 

address: packed array [1..40] of char; 

amountDue: real; 

end ; 

cRecFile = file of cRec; 

cList = array [1..20] of cRec; 

cmdType = (quit, keyln, readln, writeOut, display); 
choiceType = record 
caue boolean of 

true: (num: 0. .4) ; 
false: (cmd: cmdType); 
end; 
var 

custList: cList; 
customer: cRec; 
cFile: cRecFile; 
numberOf Records: integer; 
option: choiceType; 

function getKey: char; external; { Alcor library function } 

procedure inputCustomer (var customer: cRec) ; 
begin 
write('Enter customer name: '); 

readln (customer . name) ; 
write('Enter customer address: '); 

readln (customer . address) ; 
write( 'Enter customer age: '); 

readln (customer .age) ; 
write( 'Enter customer amount due: '); 

readln (customer .amountDue) ; 
end; 

f displays a list of the customers to the specified device } 
procedure dispList ( var custList: cList; numberOf Records: integer) ; 
var 

outFile: text; 
i: integer; 
pauseYN: boolean; 

procedure pause; 
var c: char; 

begin 

c:= getKey; 
end; 
procedure writeCustomer (var out:text; var customer: cRec) ; 
begin 

with customer do 

begin 

writeln(out, 'Name: ' ,name); 

writeln(out, 'Address: ' ,address) ; 

writeln ( out , ' Age: ',age:l); 

writeln(out, 'Amount due: ' ,amountDue:6 : 2) ; 

end; ( with ) 
end; 

begin { dispList } 

write( 'Pause after each record (TRUE/FALSE)? '); 

readln (pauseYN) ; 

write('Enter name of output file for display '); 

rewrite(outFile) ; 

writeln(outFile, 'There are ', numberOf Records, ' customers in the list.'); 

for i:« 1 to numberOf Records do 
begin 

writeCustomer (outFile, custList [i] ) ; 
if pauseYN then pause; 
end; 

close (outFile) ; 
end; 

{ returns the number of record written ! 
function readCFile(var list: cList) : integer; 
var 

cFile: cRecFile; 

i: integer; 
begin 

reset(cFile) ; 
i:= 1; 
while not eof(cFile) do 

begin 

read(cFile, list[i]) ; 

i:- i + 1; 

end; 
close(cFile) ; 
readCFile:= i - 1; 
end; 

procedure writeCFile(var list: cList; numberOf Records: integer); 

var 

Listing 5 continued 



80 Micro, November 1984 • 165 



PASCALCULATIONS 



gram writes that value to a text file, it 
uses character digits and letters. 

However, some files are in binary 
format. An integer file, for example, 
outputs integer values to a file in the 
same format you store them in. So bi- 
nary files require much less storage 
space than text files. Generally, only a 
program manipulates binary' files; if 
you need to see file contents, the pro- 
gram reads the binary format and 
writes it out in text format. 

You can use the Read and Write 
procedures with binary files, but not 
READLN or WRITELN; to read a 
line or write a line makes sense only in 
reference to text files. Program Listing 
4 reads a real-type file and sends it out 
to the printer. 

You indicate output to the printer 
by typing in :L, the standard file name 
for the parallel line printer device. 

In a text file, you use spaces as de- 
limiters to separate numerical values. 
A carriage return terminates a string. 
When a program reads a character- 
type variable from a text file, it returns 
the next character. In a packed array 



BIBLE 
HIGHLIGHTS I 



Highlights of the Bible for 
children, kindergarten through 
fourth grade 

Christian learning through 
animated Bible stones, games 
and quizes 

Covers CREATION. JEWISH 
TRIBES AND LIFE OF CHRIST 



A computer software package 
for TRS 80 Models III and IV 
Total program over 70k bytes 7 
sections each less than 16k. 

Specify tape cassette or diskette 



Price $19.50, Post paid. 
Satisfaction guaranteed 



Send check or money order to 
STAR SOFTWARE CO., 

DEPT. M80 

2315 WATERBYST 

WESTLAKE VILLAGE 

CA 91361 - 43 



of character, the size of the array 
determines the number of characters 
the program reads. 

In a binary file, all the elements are 
of the same type. This is useful when 
you're dealing with files of structured 
data types. Suppose you want to store 
information on a large number of cus- 
tomers, including name, age, address, 
telephone number, and so on. You can 
construct a record type to hold this in- 
formation and then declare a file of that 
record type. 

When the file is of a structured type, 
the Read and Write statements can 
perform I/O on the entire record, not 
just one of the fields, as is the case 
with a text file type. Program Listing 5 
reads customer information from the 
keyboard and writes it to a structured 
binary file. The program uses a num- 
ber of features, including variant rec- 
ords, introduced in earlier columns. 

When you run this program, the 
main program calls the function 
menu. You input a number from zero 
to 4 to determine the command op- 
tion. Notice that the menu function re- 
turns an integer subrange and the pro- 
gram assigns this value to a variant 
record with the statement: 

option.cmd: = menu; 



You can type in your customer records 
one at a time with the keyboard entry 
option. The read and write options 
read or write the records to a binary 
disk file. The display option prints the 
records to the specified output file; 
pressing the enter key sends the output 
to the screen. The program includes an 
option that pauses the program after 
every record until you press a key — 
this procedure uses the Alcor Library 
function GETKEY. 

By the way, a bug in the Alcor Pas- 
cal compiler can cause the program to 
fail if you change the types of the 
name and address fields from packed 
array of character to string file. When 
you're using binary files, packed ar- 
rays of character work and strings 
don't. If you must use variable-length 
character strings (string-type variables 
or fields), go with text files. 

You can use only sequential files in 
Standard Pascal; you have to access 
file data in the order of storage. Alcor 
Pascal does have a set of procedures 
for creating random access files, but 
that's a column all by itself. ■ 



You can write to Bruce Powel 
Douglass c/o 80 Micro, 80 Pine St., 
Peterborough, NH 03458. 



Using 5 continued 

cFilo: cRecFile; 

i: integer; 
begin 

rewrite(cFile) ; 
for i:^ 1 to numberOf Records do 

begin 

write(cFile, list[i]) ; 

end; 
close(cFile) ; 
end; 

function menu: cmdType; 
var 

option: choiceType; 
begin 

writeln( 'Enter choice number: '); 

wcitelnCl. Keyboard Entry of customer record ); 

wnteln('2. Read customer list from disk'); 

writeln('3. Write customer list to disk'); 

writeln('4. Display cystomer list'); 

writeln('0. Quit program'); 

writeln( 'There are currently ', numberOf Records: 1, customers. ); 

readln (option. num) ; 

menu:= option.cmd; 

end; 

begin { main program ) 
numberOfRecords:= 0; 
repeat 

option. cmd:» menu; 

case option.cmd of 

keyln: begin 

numberOf Records: = numberOf Records + 1; 
inputCustomer (custList[ numberOf Records] ) ; 

end; 

numberOfRecords:= readCFile (custList) ; 
writeCFile(custList, numberOf Records) ; 
dispList(custList , numberOf Records) ; 
case } 



readln : 
writeOut: 
display: 
end; 



until option.cmd = quit; 
end. 
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Here's a simple programming 
trick that enhances the appearance 
of printouts from your Basic pro- 
grams. It lets you create new char- 
acters with your current character 
set. You do so by printing out a 
standard character, backspacing, 
and printing another character over 
the first to get a unique third char- 
acter. For example, if you print the 
letter o, backspace, then print a 
slash over it, you get the Greek let- 
ter phi, <t>. 

Use LPRINT commands to print 
out the characters; the backspace 
code you use depends on the printer 
you own. A Radio Shack DWP-210 
needs CHR$(8); CHR$(n), where n 
equals the number of backspaces 
you want. 

The Table shows only a few of 



New Symbol Name 

Greek theta 

Greek phi 

Greek epsilon 

Yen sign 

Cents sign 

Not -equal sign 

Implies sign (right arrow) 

Sign for planet Pluto 

Partial derivative sign 



the possibilities. You can experi- 
ment with n and other available 
characters to construct useful and 
interesting new symbols. Use a dic- 
tionary that lists symbols and signs 
as a source of new characters to 
create. 

You may find control codes use- 
ful as well. For example, you can 
fractionally line-feed the DWP-210 
from Basic. This technique lets you 
produce the familiar R sign that 
druggists often use: 

LPRINT "R";CHRS(8);CHR$(6);CHR$ 
(27);CHR$(28);"X" 

If you're using a Model I, re- 
member to press the shift key for 
lowercase characters in Basic. 

a p. Houit 

Los Angeles, CA 



First Character Second Character 

o 

o / 
C 
Y 

c / 

/ 

= = or - - > 

P L 

3 o 



Table. Sample characters. 



Tidbit 
* 




I've found that the easiest way to 
use the 4 MHz Model 4 clock in the 
Model III mode is with two one-line 
subroutines: one for speeding up, 
and the other for slowing down. 

To speed up the clock to 4 MHz 
for data entry and manipulation, 
use this subroutine: 

XXXX POKE 16912,104 : OUT 236,104 : 
RETURN 

Be sure to slow down the clock 
to 2 MHz before Open, I/O, or 
PEEK statements. Use this sub- 
routine: 

XXXX POKE 16912,40 : OUT 236,40 : 
RETURN 

I used a zero to 20,000 For. . . 
Next loop for a benchmark rou- 
tine. The routine takes 51 seconds 
to run in Model III mode, and 30 
seconds in Model 4 mode. The ac- 
tual time saved changes with the 
specific execution instructions. 

Caution— The clock also runs 
faster in the speed-up mode. If you 
use the clock for specific tasks, use 
an add-on calendar and clock 
board. 

Edward E. Umlor 
East Fitzwilliam, NH 



MAGICHECK 

Is The Reason You Bought Your Computer! 



MAGICHECKS FEATURES INCLUDE: 

• Customer support telephone & bulletin board 

• Handles 8 checking accounts 

• Profit & Loss statements 

• Up to 199 user defined ledger categories 

• Pay-by-phone accounting 

• Check writing capabilities 

• Checks can be divided into different ledger accounts 

• A listing of your personal tax deductable payments 

• Extensive error correcting capabilities 

• Automatic calculation of first year depreciation 

• Automatic calculation of your investment credit 

• Divide deposits into different sources to aid planning 

— Quality Software and Superior Support 



TRS-80 

CP/M 

PCDOS/MSDOS 



$49.95 
$59.95 
$79.95 



Add $3.00 for shipping and handling. PA residents add 6% for sales 
tax. Call today 1-800-MAGIC 99. In PA call 1-215-473-6599. Or 
send your check to MagiComp, 2710 W. Country Club Road, 
Philadelphia. PA 19131. Please Specify: Make of Computer & pre- 
ferred operating system, LDOS, DOSPLUS, CP/M (indicatedesired 
format) or other. (180K Disk Storage Required) VISA & 
MASTERCARD accepted. 

Free MagiComp Bulletin Board: 215-473-2360 - 9 pm - 1 pm EST. 
Leave Orders, Questions or Share Your Suggestions. 

.-527 

Need Not Be Expensive. Their Absence May Be. — 
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THE NEXT STEP / by Hardin Brothers 



Put Your Model 4 
Function Keys to Work 



The Model 4 has three function 
keys (Fl, F2, and F3) that gener- 
ally sit unused above the numeric key- 
pad. To use those keys, you have to 
write a keyboard filter to change their 
values. This month and next, I'll show 
you how to write and install such a 
filter. 

Two short digressions before dig- 
ging into this month's program. First, 
I wrote the source code using the 
EDAS assembler. You can use any 
Model III or Model 4 assembler. To 
do so, you might have to leave the @ 
sign off the labels, slightly change the 
method of defining messages, and ex- 
pand the macro instruction (see my 
September column, p. 144). But once 
you compile the source code into Z80 
machine language, your computer 
doesn't care which assembler you use. 
Second, I'd like to give credit to two 
excellent books that helped me write 
this and next month's programs. The 
first is Radio Shack's Model 4 Techni- 
cal Reference Manual and the second 
is Roy Soltoff s The Programmer's 
Guide to LDOS/TRSDOS Version 6 
(Misosys, P.O. Box 4848, Alexan- 
dria, VA 22303). I've drawn heavily 
from both these books and recom- 
mend them. 

Understanding the Filter 

To understand this month's pro- 
gram, Three Keys (see the Program 
Listing), read the comments at the be- 
ginning of the Listing. Then look at line 
1490, where the filter module begins. 
The actual filter is relatively short- 
only 69 bytes including the memory 
header. Everything in between is the 
code that links the filter to the system 
and relocates the filter module to the 
top of available memory. 

Lines 1470-1520 are a standard 
TRSDOS 6.X memory header re- 
quired for every program and data 
area in protected high memory. The 
first 2 bytes must invoke a relative 
jump to the beginning of the actual 




program. The next 2 bytes must con- 
tain the address of HIGHS before you 
install the program in high memory 
(that is, the address of the last byte of 
this program). 

Then use a single byte to define the 
length of the module name, followed 
by the name itself. The name doesn't 
have to be the same as the program's 
file name on disk; for example, the 
TRSDOS communications driver, 
COM, has a header name of CL$. 

Four bytes follow the module 
name. The first two must contain the 
address of the filter's device control 
block (DCB) and the last two are re- 
served for future system use. An op- 
tional data area follows those bytes. 
Three Keys stores the default values of 
the function keys in the data area; if 
you want a standard set of values each 
time you install this module, store 
your own values here. Otherwise, use 
next month's program to change those 
values from TRSDOS Ready. 

The next 50 bytes actually filter the 
keyboard characters. Every time the 
system or a program calls a filter or 
driver module, it sets the Zero and 



Carry flags to indicate what type of re- 
quest you're making. When the com- 
puter sets the Carry flag in the F regis- 
ter, the calling program is requesting a 
byte of data from a particular device. 
Technically, this is called an @GET 
request. When the Cany flag isn't set 
but the Zero flag is, the program is 
sending a byte of data to the device 
(@PUT request). If neither flag is set, 
the calling program is sending a con- 
trol code to the device (@CTL re- 
quest). 

Obviously, sending data to the key- 
board makes no sense, but you can 
send a control code to the keyboard 
driver (a control code of 03 tells the 
keyboard driver to clear the type- 
ahead buffer, for example). There- 



TheKeyBox 

Model 4 
64KRAM 
Assembly Language 
EDAS 



LOAD »Q 
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fore, the filter must begin by deter- 
mining what type of request you've 
made. 

If the Carry flag isn't set, this must 
be an @PUT or @CTL request. 
Three Keys isn't designed to handle 
either, so it sends them down the chain 
of filters and drivers to which it is at- 
tached by loading the IX register with 
the value stored in the memory header 
at MODDCB, and then invoking the 
@CHNIO Supervisory Call (SVC). A 
filter doesn't need to know how it's 
connected to the rest of the system; the 
@CHNIO call, coupled with the inter- 
nal organization of TRSDOS, takes 
care of that. This filter must return 
whatever flags and values the @PUT 
or @CTL requests generate further 
down the chain. It does so with a 
simple Return command after the 
@CHN10 SVC. 

The Filter at Work 

When the filter receives an @GET 
request, it starts to work. Since the fil- 
ter doesn't read the keyboard directly 
(this would cause massive hardware 
and software confusion), it uses the 
@CHNIO SVC to send the @GET re- 
quest down the input chain (starting in 
line 1680). If the result is returned with 
the Zero flag reset, either an error oc- 
curred farther down the chain or no 
data is available for return. In either 
case, the filter returns control to the 
calling program to handle the prob- 
lem. However, if the Zero flag is set, 
the filter can get to work, and passes 
control to line 1840. 

The filter can't know whether 
you've pressed a function key. All it 
can determine from the value in the A 
register is whether the input chain has 
returned the code for such a key. The 
keyboard driver returns the hexadeci- 
mal (hex) values 81, 82, and 83 for the 
unshifted function keys, and 91, 92, 
and 93 for shifted function keys. The 
section of code in lines 1820-1890 tests 
for those values and passes control to 
line 1970 if it finds any one of them. If 
it finds none, it sets the Zero flag (to 
show that it has received data) and re- 
turns control to the calling program 
(lines 1900-1910). 

If the program finds a function key 
value, it changes it to a value from 
zero through five (beginning in line 
1970), and then looks up the appropri- 
ate new value in the data table at the 



The filter can 't know whether you *ve pressed a 

function key. All it can determine is whether the input 

chain has returned the code for such a key. 



beginning of the filter module. It puts 
the new value in the A register (where 
the calling program expects it), sets the 
Zero Hag, and passes control back to 
the calling program. 

This short filter module demon- 
strates two of TRSDOS's important 
conventions. First, a return from al- 
most any SVC with the Zero flag reset 



is an indication of an error or lack of 
data. The filter ducks those problems 
by returning the error status to the 
calling program. On the other hand, a 
set Zero flag indicates success. 

Second, the computer puts any val- 
ues it receives from an @GET request 
into the A register. Conversely, it puts 
any values passed from a program to a 
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00160 


Assemble as FKEY/FLT 






00170 












00180 


;This t 


ilter must be invoked with the SET command 






00190 


i from 


TRSDOS 6.x and then connected to the 






00200 


; keyboard ir 


put chain with the FILTER command. 






32213 












00220 


;A normal invocation sequence would De 






00230 












00240 


; SET 


•FK ;to) fkeys/flt 






00250 


; FILTER »KI [USING] *FK 






00260 


; The 


n set FKEY values using SETFKEYS/CMD 






30270 


; (s 


ee next month's program) 






00260 












00290 












00330 












00310 




Equates : 






00320 








000A 




00330 


LF 


EQC 


10 ;Line feed 


000D 




00340 

00350 
00360 


CR 
;SVCa: 


EQL' 


13 ;Carriage return 


000A 




00370 


gDSPLY 


EQU 


10 ^Display a message line 


0014 




00380 


eCHNIO 


EQU 


20 jPass control down device chain 


0016 




00390 


•EXIT 


EQU 


22 ;Exit to TRSDOS Ready 


0064 




00400 


PHIGHS 


EQU 


100 ;Find or set HIGH? 


0065 




00410 
00420 
00430 


g FLAGS 


EQU 


101 jPoint IY to system Flag Table 






00440 




Macro 


Instruction: 






00450 


...... 






0000 




00460 


SVC 


MACRO 


•NUMBER 


0000 




00470 




LD 


a.»number ;Load A with SVC number 


0000 




00480 




RST 


28H i Execute SVC 


0000 




00490 

00500 
00510 




EN DM 








00520 




Initialization Routine 






00530 












03540 








3000 




00550 




ORG 


3000K 


3000 


D5 


00560 


BEGIN 


r'JSH 


DE ;Save DCB pntr on stack 


3001 


ED534E31 


00570 




LD 


(MODDCB! ,DE ;And stuff into filter 


3005 


E5 


005B0 




PUSH 


HL rSave command pointer 


3006 


216630 


00590 




LD 


HL,SGNON ;HL==>Sign-on message 


3009 




00600 




SVC 


iDSPLY ;Display on screen 


300C 


El 


00610 
00620 


...... 


POP 


HL jRecover pointer 






00630 




Check 


if we got here from SET 






00640 








300D 




00650 




SVC 


eTLAGS ; Point IY to AFLAGS 


3010 


FDCB025E 


00660 




BIT 


3, (IY+'C'-'A' ) (Test bit 3 of CFLAG$ 


3014 


200C 


00670 




JR 


NZ, SETHI jGo if SET uBed, else 


3016 


219B30 


036BB 




LD 


HL.SETMSG ;HL«> 'Use SET" message 


3019 




00693 




SVC 


GDSPLY ;ShOw messaqe 


3 01C 


21FFFF 


00700 




LD 


HL,-1 ;Show extended error 


301F 




0-10 

00-20 




SVC 


0EXIT ;Back to TRSDOS 






00730 




Reset 


HIGHS and prepare to relocate filter 






007 40 


...... 






3022 


210000 


00750 


SETHI 


LD 


HL,0 ;Select HIGHS 


3025 


45 


00760 




LD 


B,L ;B«0 O get current value 


3026 




00""3 




SVC 


0HIGHS 

Listing continued 
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Latmg continued 












3029 


224731 


007 80 




LD 


(OLDHI) ,HL 


;Save in filter header 


302C 


280A 


007 90 

00806 




JR 


Z, RELOC 


;Go if no error 


302E 


21C630 


00810 




LD 


HL.NOMEM 


?HL"> Error message 


3031 




00820 




SVC 


0DSPLY 


,-Print it 


3034 


21FFFF 


00830 




LD 


HL,-1 


;Signal extended error 


3037 


C9 


00840 
00850 




RET 




;Back to TRSDOS 






00860 


; 


Hove 


filter to high memory and protect 






00870 










3038 


PD218A31 


00880 


RELOC 


LD 


IY.RELTAB 


;IY-->List of abs. addrs. 


303C 


118931 


00890 




LD 


DE.FLTEND 


;DE-curr. end of filter 


303P 


AF 


00900 




XOR 


A 


;Clear carry flag 


3040 


ED52 


00910 




SBC 


HL,DE 


.'Calculate dist. to move 


3042 


E5 


00920 




PUSH 


HL 


/Transfer to 


3043 


CI 


00930 




POP 


BC 


; BC register pair 


3044 


FD6E00 


00940 


RELOC1 


LD 


L, (IY-»0) 


;Get address to change 


3047 


FD6601 


00950 




LD 


H, (IY+1) 


; in HL 


304A 


7C 


00960 




LD 


A,H 


;Test for 


304B 


B5 


00970 




OR 


L 


; (end of list) 


304C 


280F 


980 




JR 


2, MOVE 


;Move module when done 


304E 


5E 


00990 




LD 


E,(HL) 


;Move contents of address 


304F 


23 


01000 




INC 


HL 


; to change in 


3050 


56 


01010 




LD 


D,(HL) 


; DE register 


3151 


EB 


01020 




EX 


DE.HL 


;HL has value to change 


3052 


09 


01030 




ADD 


HL,BC 


.•Offset value 


3053 


EB 


01040 




EX 


DE.HL 


;DE has new value 


3054 


72 


01050 




LD 


(HL) ,D 


;Put it back in place 


3055 


2B 


01060 




DEC 


HL 


; so new value 


3056 


73 


01070 




LD 


(HL) ,E 


; will be correct 


3057 


FD23 


01080 




INC 


IY 


jBurnp IY to next 


3059 


FD23 


01090 




INC 


IY 


; entry in table 


305B 


18E7 


01100 
01110 




JR 


RELOC1 


; Loop back until done 






01120 


1 


Now move module into high memory 






01130 


1 


and 


eadiust HIGHS 








01140 










305D 


ED5B4731 


01150 


MOVE 


LD 


DE. (OLDHI) 


;DE-« destination address 


3061 


218931 


01160 




LD 


HL.FLTEND 


;HL»»>Cur rent end of mod 


3064 


014500 


01170 




LD 


BC,FLTLEN 


;BC = length of module 


3067 


EDB8 


01130 




LDDR 




;Hove it 


3069 


EB 


01190 




EX 


DE.HL 


;Move new HIGHS to HL 


306A 


0600 


01200 




LD 


B,0 


.•Select HIGHS 


306C 




01210 




SVC 


9HIGHS 


(Set new HIGHS value 


306F 


23 


01220 
01230 




INC 


HL 


;HL-->New entry of module 






01240 


j 


Set Type and Address in 


Pilter's DCB 






01250 










307 


DDE1 


01260 




POP 


IX 


jGet DCB addr off stack 


3072 


DD360047 


01270 




LD 


(1X40) ,01000111E 


;Set as FILTER capable 






012 80 






1 of 3GET, JPUT, PCTL functions 


3076 


DD7 501 


01290 




LD 


(IX+1) ,L 


;LSB of Filter address 


307 9 


DD740 2 


01300 




LD 


(IX+2) ,H 


;MSB of Filter address 


307C 


21F230 


01310 




LD 


HL, DONMSG 


;HL""> Success message 


307F 




01320 




SVC 


gDSPLY 




30 82 


210000 


01330 




LD 


HL,0 


;ShOw success 


3085 


C9 


01340 
01350 
01360 


I 


RET 




;Back to TRSDOS via SET 






01370 


i 


Messages 








01380 










3086 


0A 


01390 


SGNON 


DB 


lf, 'Function Key 


Filter'.CR 


309B 


0A 


01400 


SETMSG 


DB 


lf, 'Filter Must 


be installed with SET comma n 


d 1 ,CR 












30C6 


0A 


01410 


NOHEM 


DB 


LF, 'High Memory 


not available for installati 


on' ,CR 












30F2 


0A 


01420 


DONMSG 


DB 


LF, ' installation Successfully Completed' 


3116 


M 


01430 




DB 


LF,'Use FILTER command to link to keyboard d 


river' ,CR 
















01440 


f 












01450 


• 












01460 














01470 


; 


Actual Filter Module 








014 80 










3145 


1811 


01490 


PKEY 


JR 


START 


; Beg in req'd header 


3147 


0000 


01500 


OLD HI 


DM 


■ 


;Pre-installation HIGHS 


3149 


04 


01510 




DB 


4 


;Name length 


314A 


46 


01520 




DB 


'PKEY' 


(Module Name 


314E 


0000 


01530 


MODDCB 


DM 


• 


;Addr Of module's DCB 


3150 


0000 


01540 




DM 





; For system use 


3152 


81 


01550 


Fl 


DB 


81H 


;Data storage area 


3153 


82 


01560 


F2 


DB 


82 H 


; with default settings 


3154 


83 


01570 


F3 


DB 


83H 


; of each key 


3155 


91 


01580 


SF1 


DB 


91 H 




3156 


92 


01590 


SF2 


DB 


92H 




3157 


93 


01600 
01610 
01620 
01630 


SF3 

; 


DB 
Star 


93H 

t of filter process 




3158 


380 8 


01640 
01650 


START 
.****• 


JR 


C, FILTER 


iGo if SGET request 






01660 


; 


Here 


if §put or eCTL request 






01670 


****** 








315A 


DD2A4E31 


01680 


CHAIN 


LD 


IX, (MODDCB) 


;Get DCB ptr from header 


315C 




01690 


RX01 


EQU 


S-2 




315E 




01700 




SVC 


eCHNIO 


;Pass down the chain 


3161 


C9 


01710 
01720 
01730 
01740 


1 


RET 
Here 


on 0GET requests 


;And send back unchanged 


3162 


CD5A31 


01750 


FILTER 


CALL 


CHAIN 


;Pass down the chain 

Listing continued 



device with an @PUT or @CTL re- 
quest into the C register before calling 
the device chain. All programs must 
observe the rules for the use of the A, 
F, and C registers and the Zero and 
Carry flags. 

As I said earlier, most of this 
month's listing (323 bytes) concerns 
initializing and installing the 69-byte 
filter. This installation procedure can 
be confusing to learn, but once you 
understand it, you can easily write 
your own filters. 

After the necessary equates in lines 
330-410, I've included a simple macro 
instruction that makes the rest of the 
program easier to write and under- 
stand. It simply invokes an SVC; 
for example, instead of writing LD 
A,@DSPLY followed by RST 28H, 
the macro lets you use the direct in- 
struction SVC @DSPLY. 

I designed the filter so that you can 
invoke it from TRSDOS with a com- 
mand such as SET *FK TO FKEY/ 
FLT followed by an optional list of 
parameters. From the user's point of 
view, that command associates the fil- 
ter with the "pseudo-device" *FK, so 
that a later command of FILTER ♦KI 
USING *FK puts the filter into the 
keyboard input chain. 

From a programmer's point of 
view, the Set command does two 
things. First, it loads the HL register 
pair with the address of the parameter 
list if there is one, so the program can 
later parse those parameters. Second, 
it opens a DCB for the new pseudo-de- 
vice, *FK. A DCB is a 7-byte data 
structure in low memory that contains 
the necessary information for devices 
and pseudo-devices so you can route, 
link, and filter them. Without this 
structure, TRSDOS could not be de- 
vice independent. When SET opens 
the DCB for *FK, it puts the address 
of the DCB in the DE register pair and 
then passes control to the installation 
program. 

All drivers and filters must know 
the address of their own DCB, which 
you must store in the filter header at 
the label MODDCB. Since you'll need 
that address later, the first two instruc- 
tions of the program (lines 560 and 
570) push it onto the stack and load it 
into the filter's header. The program 
then points HL to the sign-on message 
and displays that message with the 
@DSPLY SVC. 
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DISK TERM 

DISK ORIENTED TERMINAL 

FEATURES INCLUDE 

• Unattended transmission of multiple 
files 

• Transfer files without converting 

• Automatically saves buffer when full 

• Spooled serial input and printer output 

• Data translation tables 

• 8 position auto dial telephone directory 

• 8 programable macro-keys 

• Fully menu driven 

• Screen formatting 

• Execute DOS commands from program 

• Compatible with most major modems 

• Store all settings in data files for eosy 
retrieval 

• List ASCII files and buffer 

• File conversion utility 

• Operates on most mojor DOS's 

MODEL I $69.00 

MODEL III $69.00 

MODEL 4 $69.00 

MANUAL ONLY $10.00 

CHECKS M O VISA & MASTERCARD 

ADO $3.00 SHIPPING 

INDIANA RESIDENTS ADD 5*. SALES TAX 

INDIANA 
SOFTWARE DEVELOPMENT CO. 

(Division ol DonTho Computer Service Inc ) 

723 FRANKLIN SQUARE 
SUITE 502 
MICHIGAN CITY. IN 46360 
Phone: (219) 879-2941 -"»« 



LARGE CAPACITY 

ACCOUNTING PROGRAMS 



ACCTS RECEIVABLE $149 95 

5000* ACCOUNTS 15000+ TRANSACTIONS 
BALANCE FORWARD 99 TRANSACT CODES 
30 60 90-120 AGED STATEMENTS SHOW 
DATE'INV* 'DESCRIP-AMTfWITH AGEINGl 
Sfcl FCTIVE FINANCE CHARGES & RATES 
FAST ENTRY POSTING W'AUDIT REPORT 
SUB ACCTS «b OF CREDIT LIMIT DATE OF 
LASTPAYMENT SALES ANALYSIS [ABELS 

GENERAL LEDGER $149 95 

400+ ACCTS 5000+ TRANSACTIONS'MONTH 



W NO OTHER SYSTEM OFFERS 



t REPORT FLEXIBILITY/CAPACITY 
t DEPARTMENT P S I (UP TO 9) 
t USE 100+ SUB-TOTALS 
• STATEMENT OF CHANGES(ASSETSl 
' PERCENT P& L + ACCOUNT DETAIL 

ACCTS PAYABLE $49 95 

BALANCE FORWARD y9 TRANSACT CODES 
30 60-90-120 AGED CHECK WRITER 

DATE/INV«/DESCRIP/AMT|WITH AGEINGl 
FAST ENTRY POSTING W/AUDIT REPORT 



DEMO AVAILABLE AT S20 00 

PER SYSTEM 
APPL IESTOWARDPURCHASE 



OPTIONAL— 

—Hard Disk Versions- 
— A/R Auto Post— 
— A/R Invoicing— 



H. D. P. 




.:■■■■ \ ■■,- : ■ ; 


,U ' ■ ■ ■ :. (I! 


VISA or M/C 




^355 



a 

m 
o 

> 

TJ 
> 
O 
N3XSAS AJJOVdVO 30MV1 M3J.SAS AH 




NEW 



(or TRS-80 Models l/IH/4, 
a powerlul but inexpensive 
communications program 



■ works on all DOSs 

■ continuous print of incoming data or 
screen print 

■ XON/XOFF codes can be changed to 
suit host 

■ auto dial and auto log-on 

■ framing, parity, and overrun errors 
reported 

■ handles ASCII or binary files 

■ large capture buffer 

■ block or prompted transmissions 

■ keeps track of time on-line 

■ use with null modem cable up to 
9600 baud 

can be integrated with Lazy Writer word 
processor, or use alone 

INTRODUCTORY PRICE $34.95 

-JLLPHABIT C0MMTJWICATI0N8 , INC . 
13349 MICHiaAH AVX. 
DKAHBOHJST, MI 48186 

(SIS) 881-8896 „ 4 76 



An Easy Way To Organize 



Learn to write your own data base manager 



/ 



TRS-80 

DATA FILES 




JOHN I 



John D. Adams ISBN 0-88006-066 2 
CC7398 102 pp. 7 by 9 $24.95 



Introduction to TRS-80 Data Files is a 
■ book-and-disk combination that 
teaches you to write a TRS-80 data 
base management program. Your pro- 
gram will help you organize any data 
you need to keep— whether it's income 
tax records or a mailing list for a small 
business. You learn by doing it your- 
self and have your own customized 
program. 



You'll learn about sequential and 
random access files— how they 
work, advantages and disadvantages, 
and how to use them. You'll see a 
mailing list program built in sections, 
first using sequential files, then ran- 
dom access, so you can examine all the 
parts. A section on modifications 
allows you to use the book with the 
Model I or Model III. 



To order 



To order, call toll-free 1-800- 
258-5473 for credit card orders 
Or mail your order with check 
or money order or complete 
credit card information to: 
Wayne Green Books, Retail 
Sales, Peterborough, NH 
03458. Please include $1 .50 for 
the first book. $1.00 for each ad- 
ditional book, for shipping and 
handling. Orders payable in U.S. 
dollars only. Allow 4 to 6 weeks 
for delivery. Wayne Green 
Books are available at your local 
bookstore. Dealer inquiries 
invited. 3411B8D 



Send me copies of Introduction to TRS-80 Data Files 

(CC7398) at $24 95 each, plus shipping and handling. 

□ payment enclosed □ MasterCard □ Visa H Am. Ex. 



Card f 


MC bank* 


Expiration date 


Signature 


Name 


Address 



City State Zip 

Wayne Green Books, Peterborough, NH 03458 



-68 



• See List ot Advertisers on Page 176 
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THE NEXT STEP 




OUR 
CHARTS 
EXPLAIN IN PLAIN 
ENGLISH WHAT THEIR 
MANUALS ARE TRYING TO SAY! 



SuperSCRlPSIT' insert pj>s Mod 5 expands training 
manual; Combines ret. manual info. ln<. dun . . . $16.00 

Profile III Plus' 106 insert p^s lor Mod i manual, expl. 
examples. 2 lbx.22 flow charts . . . $16.00 
CL insert pgs Mod I Disk Manual. How to run it right! In< 
chart shows Cycle. P&L.Bal Sheet. Terms $16.00 



\\\n CHARTS showing all comm 


nds used 


& explanatio 


s for the following programs: 


1 All are 19x25. 2- 


olors. easy to read - 


-$5.00 each) 


SuoerSCRIPSIT' 


MOO 3, Profile III* 


'.VislCak', 


General ledger Mod 3, Bask Mod 3, Basic Mod 4. 



MOD 4 BY |ACK - Ne 

and BASIC operations » 
operators manual in r 
indexes 6x") inches . . 



\est hook showing all Mod 4 DOS 
ith manv c lear examples Replat es 

lost cases Very cleat & extensiye 
$16.1X1 



MOD 4 BASIC CHART - 2-color vs. 
BASIC & DOS 6.1.2 operations with e 
INDEXES Detailed indexes on hea 
holes, for the manuals of Profile III- 



I < hart shows most 
jmples . . $5.00 
y stock, punched 3 
MOD 4 DISK SYS 



OVVNIRS MASLAI., SuperSCRIPSIT III .... leachi $5.00 
MONTHLY NEWSLETTER — Deals mainlv with word pro- 
cessingdata base on Mod 3,4.100. Mailed 1st class with 
wide range of topics lor non-hackers $24.00/ vr 

' - Copyrights of Tandy or VisiCorp 



Send cash, check, money order to: 

CREST SOFTWARE ^223 

2132 Crestview. Suite "12 . Durango, CO 81301 

,301) 247-9510 

visa MC accepted, include card « and expiration date 

(Add $2.00 Shipping — We use UPS) 



Listing continued 














3163 




01760 


RX02 


EQU 


S-2 






3165 


C0 


01770 
01780 


,.*.*• 


RET 


NZ 




;If no char or error 






01790 


; 


Character was received 


from the chain. 






01800 


1 


Before 


returning to the 


calling routine 






01810 


I 


the Z 


flag must be 


rest 


ored, and the 






01820 


1 


approp 


riate character returned in A 






01830 


j ***** 










3166 


FE81 


01840 




CP 


81H 




;Is it less than Fl? 


316B 


3 80C 


01850 




JR 


CLEAVE 




; yes , then go 


316A 


FE94 


01860 




CP 


94H 




;Is it greater than SF2? 


316C 


3008 


01870 




JR 


NC, LEAVE 




; yes , then go 


316E 


PE84 


01880 




CP 


84H 




;Is it Fl, F2, or F37 


3170 


3806 


018 90 




JR 


C, CHANGE 




; yes, then filter 


3172 


FE91 


01900 




CP 


91H 




jls it SF1, SF2 or SF3? 


3174 


3002 


01910 




JR 


NC, CHANGE 




; yes, then filter 


3176 


BF 


01920 


LEAVE 


CP 


A 




;Set z flag 


3177 


C9 


01930 
01940 


,"... 


RET 






;Back to caller 






01950 




A function key was 


pres 


sed. Now, change its code 






01960 


t 


to B - 


5 (Fl through SF3) , then use that code 






01970 


t 


as an 


index to the 


data 


list in the module header 






01980 


****** 










3178 


D681 


01990 


CHANGE 


SUB 


eiH 




;0 if Fl 


317A 


FE04 


02000 




CP 


4 




;Is it a shifted key? 


317C 


3802 


02010 




JR 


CCHNGl 




;Go if not 


317E 


D60D 


02020 




SUB 


0DH 




;3 if SF1 


3180 


6F 


02030 


CHNG1 


LD 


L,A 




;Value into L 


3181 


2600 


02040 




LD 


H,0 




;HL « offset value 


3183 


115231 


02050 




LD 


DE.F1 




;DE-=> top of list 


3184 




02060 


RX03 


EQU 


$-2 






3186 


19 


02070 




ADD 


HL,DE 




;Get offset 


3187 


7E 


02080 




LD 


A,(HL) 




;Get new value 


3188 


18EC 


02090 
02100 


. ***** 


JR 


LEAVE 




;Send it back 






02110 


; 


Values 


for relocat 


ion 








02120 


.*•••* 










3189 




02130 


FLTEND 


EQU 


S-l 




;End of filter 


0045 




02140 


FLTLEN 


EQU 


S-FKEY 




;Length of filter module 


318A 


5C31 


02150 
02160 


RELTAB 
t 


DW 


RX01,RX02, 


RX03 





3000 




02170 




END 


BEGIN 






30000 Total 


errors 


























End 



Next, the program must be sure you 
invoked it with the Set command. It 
checks this by examining the third bit 
of system flag C. The flags are a set of 
26 bytes in low memory, each of which 
can contain up to eight individual 
pieces of information about the sys- 
tem's current state. The ©FLAGS 
SVC points the IY register to flag A; 
other flags might be offsets from that 
address. The program checks to find if 
bit 3 of flag C is set. If it isn't, you've 
invoked the program directly from 
DOS, the value in DE at the beginning 
was in error, and the program termi- 
nates with an error message. 

Finally, the program (lines 730- 
1200) goes through a standard series 
of routines to relocate the filter mod- 
ule to high memory and protect it 
there. Notice that it also changes all 
absolute addresses in the filter module 
by finding their addresses from a relo- 
cation table at the end of the program 
(which explains the reason for the 
RX01, RX02, and RX03 labels in the 
filter). 

The last step of installing the filter is 
to set its address in its own DCB in low 
memory (see lines 1240-1320). First, 
the program stores a bit record at the 
beginning of the DCB showing that 
this is a filter capable of handling 



@GET, @PUT, and @CTL requests. 
Finally, the program installs the 
filter's address (in high memory) in the 
DCB. Notice that the DCB has a 
pointer to the filter and the filter has a 
pointer to the DCB (in the MODDCB 
word in the header). Both pointers are 
necessary so TRSDOS can keep track 
of the Filter, Route, and Link opera- 
tions. 

Next month, I'll present and explain 
a companion program that lets you 
change the function key values after 
you've installed Three Keys, and also 
explain how you can use the function 
keys to produce strings such as EDIT 
and LIST while you are using Model 4 
Basic. ■ 



Readers who subscribe to Compu- 
Serve can take part in discussions of 
topics covered in The Next Step. GO 
PCS- 117 to the Software and Authors 
Special Interest Group (SASIG), and 
leave your questions addressed to 
Hardin Brothers. Feel free to join in 
conversations started by others. 

You can also write to Hardin 
Brothers at 280 N. Campus Ave., Up- 
land, CA 91786. Enclose a stamped, 
self-addressed envelope if you want a 
reply. 
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CONTROL YOUR 

COSTS AND 

MAXIMIZE 

YOUR PROFIT 



To make a profit, you have to know what 
your costs are. Low Cost Costing is a book- 
and-software combination that will help you 
determine production costs for your small 
business, using your Apple, IBM PC, or TRS-80. 
If you are responsible for production, you can 
increase your profits once you know what 
you're spending. Low Cost Costing shows you 
how to analyze your costs using your profit-and- 
loss statements and your microcomputer. Once 
you've found them, you can: 

• Cut your costs. 

• Adjust prices. 

• Set marketing and manu- 
facturing strategies. 

• Determine why 
some products sell and 
others don't. 

It's the time- and money-saving combination 
your small business needs— Low Cost Costing and 
your micro. 
Low Cost Costing 
Thomas S. Fiske 
approx. 112 pp. 
$24.97 



LOW 

COST 

COSTING 

mom n i o\i/\i. 

Willi WM ft 
VIK 'mxO.W'1 'II K 

THCUiS S f ISKE 

/ 



TRS-80 Model I, III 

CC7403 [prtifrl 

ISBN 0-88006-072-7 



Apple II, II Plus, lie 

CC7399 [package] 

ISBN 0-88006-067-0 

IBM PC 

CC7402 (packagr) 

ISBN 0-88006-071-9 



To order i all loll free 1-800 25K rU73 lor credit card order* Or mail your order with 
check nr money order or complete credit card information to Wayne Green Rooks 
Retail Sales Peterborough NH (13458 Please include shipping and handling of II 50 for 
the first system $1 00 for each additional system Orders payable in US dollars only 
Please allow 4 6 week* for delivery 



Yes, 



>a 1 want Low Cost Costing, $24.97 per system, plus ship- 
ping and handling ($1.50 for the first system, $1.00 for each addi- 
tional system). Please indicate total number wanted for each 
system. 



_ Apple I.CC7399I _IBM PC (CC7402I 

□ payment enclosed — MasterCard 

Card* MCbank* 



_ TRS-80 |CC7403I 
Visa n Am. Ex. 



Expiration date 

Name 

Address 

City 



Signature 



State 



Zip 



L. 



Wayne Green Books, Peterborough, NH 03458 3411B8L 



J 



STAT21 

CASINO BLACKJACK CARD 

COUNTING STRATEGY SIMULATION 

AND ANALYSIS PROGRAM 

STAT21 IS NOT A CAME. IT ALLOWS YOU TO DETERMINE THE 
EFFECTIVENESS OF YOUR CASINO BLACKJACK CARD 
COUNTING STRATEGY AND/OR COMPARE STRATEGIES. 

• Fast, 100> Machine Language, simulates 100+ hands per 
second. 

• Flexible. Virtually any casino blackjack card counting 
strategy can be simulated. You enter the strategy. 

• user friendly. Completely table driven. 

• up to 9,999,999 hands can be simulated. 

• Ability to store simulations to disk. 

• Simulation results include: 



Total Action 
Total Stake 
Stake/Action 



High & low Stakes 
Betting Analysis 
insurance Analysis 



• includes Comprehensive user's Manual. 

48K 2 Disk Model in or Model 4 required. Provided on 
•TRSDOS 1.3 Formatted Disk. 

(•Trademark of Tandy Corporation) ►" 19 

$59 Plus $3.00 Shipping & Handling. California 
Residents add 6/ . To order or for further information 
write: walksoft Programming, P.O. Box 1878, 
Ridgecrest. CA 93555. 



More 80 



THE 

REST 

of a 



The Rest of 80 

from the editors 
of Wayne Green 
Books 



all 

new 

tutorials 

and 

utilities 



80 Micro readers always 
want more. There is some- 
thing for all TRS-80 users in 
this collection of 31 never- 
before-published utilities and 
tutorials. Both Model I and 
Model III subjects are cov- 

^- ered. Topics include graphics, 

passwords, Scripsit and EDTASM modifications, 
and a Pascal tutorial. Complete program listings 
are given, along with numerous examples, figures, 
and tables. 



$9.97 

BK7392 



ISBN 068006062-X 7 by 9 

softcover with spiral binding 232 pp. 



1963 



TO ORDER 



Call toil-free 1 -800-256-5473 for credit card orders. Or mail your 
order with check or money order or complete credit card informa- 
tion to: Wayne Green Books, Retail Sales, Peterborough, NH 03456. 
Please include $1.50 for ihe first book, $1.00 for each additional 
book for shipping and handling. Orders payable in US dollars only. 
Allow 4-6 weeks for delivery. Dealer Inquiries invited. Wayne Green 
Books are also available in bookstores. 



1-800-258-5473 



*■ See List ol Advertisers on Page 176 
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2000 PLUS / by John B. Harrell III 



Memory Management 
On the Model 2000 



If you just bought a Model 2000 and 
started to run Basic programs on it, 
you might wonder what happened to 
all your memory. You're not alone in 
your bewilderment; the questions 
most frequently asked by Model 2000 
owners concern the limits of the com- 
puter's memory. 

Several factors affect the space 
available for your programs. First, the 
80186 processor uses segment address- 
es and displacements to address the 
entire 1M byte of memory. For exam- 
ple, a 16-bit segment address points to 
the segment's beginning and the com- 
puter multiplies the segment address 
by 16 (shifted left by 4 bits) for each 
access to a location within the seg- 
ment. The displacement is added to 
the result. The equation follows this 
format: 

Segment address = E800H • 16 - > E800H 
Displacement = 0FA0H + OFAOH 



Absolute address - 



F.HFAOH 



Each segment is limited to a 16-bit 
displacement value, so a segment's to- 
tal available memory is 65,536 bytes 
(64K). The Basic interpreter works 
with only one segment for both data 
and program storage. Your program's 
maximum available memory is also 
64K. Microsoft's Basic won't recog- 
nize any additional memory you in- 
stall. The interpreter requires about 
62K for some address space on a 256K 
machine. 

128K of Memory? 

What about the memory considera- 
tions of the 128K Model 2000? Before 
you can load Basic, you have to load 
MS-DOS. This consists of the two hid- 
den files (IO.SYS and MSDOS.SYS) 
that you list when you run CHKDSK 
with the "/v" option. MS-DOS 
02.00.02 requires about 50K RAM. 
The Basic interpreter requires about 
49K, leaving the remainder of 29K 
available for the interpreter's work 
space. But, using simple arithmetic 




you'll notice that running any large 
programs (including some of the 
Model I/1I1 software you transferred 
using the Convert command from last 
month) requires 256K of memory. 

IBM Compatibility 

The Purge utility that appeared in 
the September issue of 80 Micro as a 
sidebar to 2000 Plus is great (p. 154). It 
only lacks a wildcard or multiple file 
purge function. 

A short batch file improves the ca- 
pabilities of Purge using MS-DOS 
system commands (see Fig. 1). KILL 
.BAT lets you specify up to seven file 
names for a wildcard purge. The For 
statement executes the specified com- 
mand once for each element in the set. 
The statement KILL*.BAS FC*.* de- 
letes all the .BAS files in the current 
directory, then it removes files begin- 
ning with FC. 

A word of warning: HELP. BAT 
doesn't ask for any confirmation of 
the file names before deleting them. 
Press control-C if you notice an error. 

If you want a copy of this routine 
(modified to run on a hard disk sys- 
tem), send me a self-addressed, 



stamped disk mailer and disk and I'll 
write the source code and assembled 
version to the disk. The offer is open 
to anyone using an MS-DOS-compati- 
ble computer. Send the disk formatted 
for your computer if you don't own a 
Tandy 2000. 

The Model 2000 can write to an 
IBM PC-formatted disk and an IBM 
PC can read it. You must write to a 
clean, formatted disk. Don't just erase 
all the files; reformat the disk using the 
Format command. You can write to 
either the single-sided format or the 
double-sided format. 



MS-DOS's Nested 
Directory Structure 

MS-DOS has a nested directory 
structure. This utility prevents you 
from transferring software without 
first considering the disk structure. 

The nested directory feature lets the 
operating system store directories 
within directories. On a hard disk sys- 
tem, you can use this to your advan- 
tage. 

Using subdirectories and small 
batch files you can execute your pro- 
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grams from the main directory. Figure 
2 demonstrates how to use the batch 
file that's required to execute Word- 
Perfect on the 2000. The batch file 
correctly selects the cleanup opera- 
tions required, and returns to the main 
directory for another task. 

I didn't clutter the main directory' 
with all the files on the MS-DOS mas- 
ter disk. By keeping the main directory 
simple, I can use it within any subdi- 
rectory. 

I solved the problem by copying all 
the MS-DOS files to another subdirec- 
tory called /DOS. Then I built an AU- 
TOEXEC. BAT file that executes 
whenever you boot the computer from 
the hard disk that contains the follow- 
ing command: PATH.:\C:DOS. MS- 
DOS searches the current directory for 
the command and then searches the 
/DOS subdirectory on drive C (the 
hard disk). You can use the floppy 
drive as the default drive and still ac- 
cess any of the appropriate MS-DOS 
system routines on the hard disk with- 
out redefining the default drive. 

Bugs in Model 2000 Software 

Have you noticed that some soft- 
ware that's supposed to display bold 
intensity characters on the screen actu- 
ally makes the characters dimmer than 
the normal text? This is caused by a 
BIOS code bug. If you have Word- 
Perfect, you can patch the BIOS code 
using the VIDPATCH routine. 

Ever wonder why MultiMate ap- 
peared on the shelves in Radio Shack 
stores sporting MS-DOS 02.00.02? 
The MultiMate upgrade corrects the 
defective BIOS code of the earlier ver- 
sion of MS-DOS. This defective BIOS 
code is also responsible for the poorly 
underlined letters on WordPerfect, 
Open Access, and other program 
packages. I discovered the problem 
with the BIOS code by trying to run 



Have you noticed 
that some software 
that's supposed to 

display bold characters 

on the screen 

actually makes the 

characters dimmer 

than the normal text? 

Open Access after using MultiMate one 
night without resetting the computer. 

Another bug in the earlier versions 
of MS-DOS (prior to 02.00.02) is ex- 
plained by this Basic program: 

10 SCREEN 3 
20 CIRCLE (32O.200).5O,3 
30 CIRCLE (320.200). 100,3 
40 PAINT (320,250),4,3 

Run this, and it draws two concen- 
tric white circles filled with red and re- 
turns to the Basic OK prompt. The 
earlier versions of MS-DOS won't per- 
form this correctly and require a con- 
trol-C to interrupt the last statement. 

A Permanent Fix 

In the September column, I present- 
ed a sequence of operations that you 
could use through Debug to operate a 
non-Radio Shack printer with the 
Model 2000. In case you don't remem- 
ber, you make the change by placing a 
00 hexadecimal (hex) byte into abso- 
lute address 004DA hex. While this so- 
lution works, nobody likes to continu- 
ally load Debug and make this change 
for each disk swap. 

I came up with a better solution. 
Some explanation of the 2000's 80186 
microprocessor addressing scheme 
helps clarify it. The 80186 can address 
up to 1 megabyte of memory, which 



REM MS-DOS Multiple File Kill Procedure 

REM written by John B. Harrell, III 

REM 

REM Files to be purged are: 

REM %1 %2 %3 %4 %5 %6 %7 

REM 

PAUSE ***** Press CTRL-C to abort ***** 

ECHO OFF 

FOR %%F IN (%1 %2 %3 %4 %5 %6 %7) DO DEL %%F 

ECHO ON 

"Z 

Figure /. A batch file that executes the multiple file kill procedure. 



requires 20 bits to represent the maxi- 
mum address (FFFFF hex). To do this 
with a machine that uses only 16-bit 
addresses requires some complex op- 
erations. 

Like several larger computers, the 
Model 2000 uses segment registers to 
point to the starting address of a block 
of code, data, and so on. The 2000 
combines these 16-bit segment ad- 
dresses with a displacement within the 
segment to form the effective address. 
The machine multiplies the segment 
address by 16 (shifting it left 4 bits), 
then adds it to the displacement. 

For example, if the segment register 
contains 4F00 hex and the displace- 
ment is 0123 hex, the 2000 multiplies 
4F00 hex by 10 hex (16) to get 4F000 
hex. Then it adds the result to 0123 hex 
for an effective address of 4F123 hex. 

Table 1 is a sequence of Debug 
commands that create a short ma- 
chine-language program. The pro- 
gram sets a printer's line-feed byte cor- 
rectly and automatically. The first 
instruction (MOV AX,40) sets the AX 
register to the value 0040 hex, which 
becomes the segment address. 

The next instruction (MOV DS, 
AX) sets the data segment register 
(DS) to the segment address from the 
contents of AX. The third instruction 
(MOV [DA], AH) moves the upper 
byte of the AX register (which con- 
tains 00 hex from the first instruction) 
to the address pointed to by the DS 
segment register and the displacement 
(DA hex). The last instruction (INT 
20) is a programmable interrupt re- 
turning control to MS-DOS. 

The next Debug command sets the 
CX register to the byte count used in 
saving the program to a disk file. The 
N command sets the Debug file name, 
and the W command writes the num- 
ber of bytes specified by the CX regis- 
ter to the file beginning at address 



CD \wordperf 
PATH .;C:\dos 
vidpatch 1 
wp 
CD \ 



Figure 2. This batch file starts WordPer- 
fect. 
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0100 hex in the current code segment. 
I saved the program under the name 
of ADDLF.COM, and you can 
choose any name you wish in place of 
the one used in the N command. Now 
you can automatically install the patch 
by including ADDLF in the AUTO- 
EXEC.BAT file; your Model 2000 
will run ADDLF.COM every time you 
reset it. 



Command 


Comments 


Debug 


Invoke MS-DOS's dy- 




namic debugging envi- 




ronment to allow en- 




tering ADDLF.COM. 




Begin assembling sym- 




bolic machine instruc- 




tions into location 




0100 hex of the cur- 




rent code segment. 


A100 


Begin assembling sym- 




bolic machine instruc- 




tions into location 




0100 hex of the cur- 




rent code segment. 


MOV AX.40 


Load the AX register 




with the segment ad- 




dress 0040 hex. Note 




that the code segment 




address displayed 




(0E56 hex) might be 




different in your ma- 




chine. 


MOV DS.AX 


Load the data segment 




address with the seg- 




ment address in AX. 


MOV [DA], AH 


Move the upper byte 




of AX (containing 00 




hex) to address OODA 




hex of the data seg- 




ment. 


INT 20 


Return to MS-DOS 




via system call. 


Press the enter key Exit machine-language 




assembler. 


RCX 


Display and modify 




register CX. 


80 


Set the CX register to 




80 hex (128), the num- 




ber of bytes to write 




to file. 


NADDLF.COM 


Identify the file as 




ADDLF.COM. 


W 


Write the file to the 




disk. 


Q 


Quit and return to 




MS-DOS. 


Table 1. Sequence of commands to create 


ADDLF.COM, a 


program that prevents re- 


movat of linefeeds sent to the printer. You 


must terminate all entries in the command 


column by pressing the enter key. 



New Software for the 2000 

Despite the slow start in November, 
the Model 2000's picking up momen- 
tum in the software market (see Table 
2). Radio Shack released two surpris- 
es: Lotus 1-2-3 and SuperCalc III. 
Both packages make use of the Model 
2000's advanced hardware features. 

Radio Shack's Express Order Soft- 
ware's growing, too. I wasn't sure that 
this concept would be popular, be- 
cause of the difficulty in convincing 
people unfamiliar with software prod- 
ucts to buy them without prior dem- 
onstration. I was wrong. Express Or- 
der Software has many new packages 
currently available on short delivery 
schedule from your local Radio Shack 
stores: Open Access, Easy Writer I, 
T/Maker, and others. 

With this support and support of 
other software houses, success for this 
superior machine's assured. Soon, 
Ovation and MS-Windows should be 
available for the 2000, increasing the 
power and versatility of this machine. 

Next Month, Word Processors 

Next month I'll compare the word 
processing software available for the 
Tandy 2000. Find the one that's right 
for you. ■ 

Write to John B. Harrell III c/o this 
column, 80 Micro, 80 Pine St., Peter- 
borough, NH 03458 or via Compu- 
Serve at 73016,1326. 



Open Access 

Software Products International 

10240 Sorrento Valley Road 

San Diego. CA 92121 

Available through EOS 

$595 

MS-DOS Version 02.00.02 
Radio Shack Computer Centers 
Catalog number 700-6201 
Free upgrade 

WordPerfect 
Software International 
288 W. Center St. 
Orem. UT 84057 
$445 

Lotus 1-2-3 

Radio Shack Computer Centers 

Catalog number 26-5300 

$495 

Table 2. Model 2000 software product 
listing. 



SOFTWARE 
PRICE WAR 

ANY SYSTEM ONLY 

$24.95 

AVAILABLE: 

• LYNN'S PAYROLL SYSTEM 

• LYNN'S ACC. RECEIVABLE 
•LYNN'S CHECK REGISTER 

• LYNN'S TRSDOS UTILITY 

• LYNN'S E-Z MAIL 

All lyatema are on a TRSDOS 1.3 diskette ready to 
run on a TRSM Modal III or Modal IV In III Mod*. 

ALSO 

• VERRATIM DISKETTES 
(MD 525-01 SS/DD) 

ONLY $25 



per plastic 
box of 10 



JOE LYNN 



COMPUTER SERVICES 

23501 W. Gagne Lane 

Plainfield, I L 60544 

815/436-4477 



PLEASE SEND ME: 

D LYNN'S PAYROLL SYSTEM 

□ LYNN'S ACCOUNT RECEIVABLE 

□ LYNNS CHECK REGISTER SYSTEM 
D LYNN'S TRSDOS UTILITY PROGRAMS 
D LYNN'S E-Z MAIL SYSTEM 

D VERBATIM DISKETTES 

D I'M INTERESTED -SEND ME MORE INFO. 

Please Include S3 00 Shipping (plus $1.65 if COD) 
Illinois residents add 6v«4b sales tax 
5S surcharge for credit card orders 

Total amount enclosed 



□ CHECK/MO 
CARD # 



DVISA 



D MC 
EXP. 



□ COD 



SIGNATURE. 



NAME. 



ADDRESS. 

CITY 

ZIP 



STATE 



.PHONE 



JOE LYNN COMPUTER SERVICES ' 1 12 

23501 W. Gagne Lana, Plainfield, IL 60544 
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Continued from p. 40 

The DMP-420 

At $999, the DMP-420 is at the top 
end of the under-$ 1,000 Radio Shack 
printers. It has excellent print quality 
plus other handy features, such as 
132-column printing, super-/sub- 
scripting, Kana characters, and bold 
print. 

Physical Description and Set-up 

The DMP-420 is 6.3 inches high by 
25.6 inches long by 13.6 inches deep 
and weighs about 35 pounds. Its con- 
trol panel has on/off line, form feed, 
line feed, up 1/12 line feed, down 1/12 
line feed, and reset buttons. 

Probably the most confusing part 
of setting up the DMP-420 is remov- 
ing it from the box, because it's so se- 
curely packed and protected. Radio 
Shack provides a sheet of instructions 
on how to unpack and repack the 
printer, and the front cardboard pro- 
tector has removal instructions at- 
tached to it. Unfortunately, you have 
to partially remove the cardboard be- 
fore you can read the instructions. 

Once you get it unpacked, however, 
the remaining set-up is quick. The 
manual fully describes each aspect of 
the printer with illustrations and text. 
You attach a paper guide to the back, 
insert the ribbon cartridge, connect 
the printer cable, and plug it in. 

A set of eight DIP switches on the 
back of the printer lets you choose be- 
tween serial or parallel input, 600 or 
1,200 bits-per-second serial input, 
word processing mode or data pro- 
cessing mode on power-up, ASCII or 
modified ASCII characters, European 
or Kana characters, line-feed options, 
and DMP-420 or LP- VI modes. Some 
of the DMP-420 commands are differ- 
ent from those of the LP- VI. If your 
software uses LP- VI commands, you 
can set the appropriate DIP switch on 
the DMP-420 so it can accept the LP- 
VI commands. 

Fortunately, you wouldn't have to 
change the rotary switch or DIP 
switches very often. They're hard to 
reach and so small it's almost impossi- 
ble to set them by hand; you really 
need a set of miniature tools. 

Specifications 

Bidirectional carriage motion prints 
approximately 140 characters per sec- 



ond in standard pitch, up to 132 char- 
acters per line and 12, 6, or 8 lines per 
inch (computer selectable). It has an 
8-bit parallel interface and an 8-bit, 
600 or 1,200 bits-per-second serial in- 
terface. 

You can start printing as soon as 
you insert the paper. The DMP-420 
uses single-sheet or tractor-feed paper 
from 4 to 15 inches wide. You can re- 
move the tractor-feed mechanism 
when you use single sheets, but that's 
optional. 

The 420 provides three tests to veri- 
fy proper functioning of the printer 
and two of them are performed 
without the computer. One tests car- 
riage movement and the other repeat- 
edly prints the 96 ASCII characters. 

The third test sends data to the 
printer using a computer program. 
The Hex Print mode prints the data in 
hexadecimal, letting you verify exactly 



The front cardboard 

protector includes 

removal instructions. 

Unfortunately, you have 

to remove the cardboard 

before you can 

read the instructions. 



what information the printer receives, 
including control codes. 

The actual printing noise is less than 
the DMP-110 and DMP-120, but 
there is quite a "klunky" sound with 
each line feed. Printing speed is signif- 
icantly faster than the other two print- 
ers. According to our timing test, the 
DMP-420 is twice as fast as the 
DMP-120 and three times as fast as 
the DMP-110. 

The three printing modes are data 
processing, word processing, and 
graphics. The data processing mode 
prints the fastest and is best for print- 
ing program listings and data. The 
printer puts a line-feed code into effect 
at the end of the line being printed and 
stays in effect until a new line feed 
code is received. 

The word processing mode has bet- 
ter quality print and is better suited to 
letter-writing and text. A line- feed 
code is put into effect immediately and 



is temporary. The line feed code is ter- 
minated by the next line feed or a new 
code. 

The graphics mode is strictly for 
graphs or pictures. It prints only bit- 
matrix graphics and doesn't accept 
characters or standard line-feed codes. 

You can choose from four print 
fonts and three character widths. Each 
font style has a unique dot-matrix pat- 
tern. The standard font uses a 9- by 
8-dot matrix, the correspondence-qual- 
ity font uses a 15- by 8-dot matrix, the 
proportional one uses a variable-dot 
by 8-dot matrix (depending on the let- 
ter), and block graphics uses a 6- by 6- 
dot matrix. 

You can print the standard and 
block graphics fonts in all three char- 
acter widths, normal (10 cpi), com- 
pressed (12 cpi), and condensed (6.7 
cpi). The correspondence-quality font 
prints at normal width, and the pro- 
portional font prints at normal or con- 
densed width (the cpi would vary be- 
cause of the variable letter width). 

You can print any of the fonts in 
elongated (twice the normal width) or 
bold (double strike) format, but you 
can't print them both elongated and 
bold. 

You can set a rotary switch on the 
left front inside of the printer for the 
desired cpi when the printer is turned 
on. A software command code over- 
rides the set cpi. 

The standard or modified ASCII 
characters are available, as well as a set 
of 30 block graphics and 25 European 
or Kana symbol codes. Control codes 
provide underline, superscript and 
subscript, repeat and backspace capa- 
bility. Backspace is accomplished by 
dot columns allowing designing and 
printing of special characters. 

The Documentation 

Most of the manual is clear and easy 
to understand but doesn't include an 
index. Although there are several 
small programs to demonstrate the use 
of the printer, we would prefer better 
explanation of the programs, especial- 
ly in the graphics area. The graphics 
demonstrations are of poor quality 
and do little to show you how to de- 
sign and use the excellent graphics ca- 
pability of this printer. 

This manual also contains sections 
on care and maintenance, potential 
problems, interface information, and 
a schematic diagram. 
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WE'LL PUT YOU ON THE SAME WAVELENGTH 
WITH YOUR RADIO SHACK' TRS-80 MODEL 4. 



LEARNING TO USE 
YOUR COMPUTER IS 
FUN AND EASY WITH 
OUR PLAIN LANGUAGE 
VIDEO TUTORIAL. 

What if your PC sud- 
denly became faster, 
smarter, and easier to use 
at the snap of a finger? 
Well, unless you re a 
genius, learning to oper- 
ate, program and per- 
form software applica- 
tions just doesn't happen 
that fast. But now, you 
can make your climb to 
learning successful com- 
puter operation easier 
than ever and keep your 
enthusiasm for the com 
puter age growing . . . 

INTRODUCING 
COMPUTUTOR™ 

Compulutor, developed by Chase Scientific, is a 
remarkable series of plain language computer tutorials 
on pre-recorded videocassette that will make learning 
to operate your TRS-80 . Model 4 (or compatible) a 
matter of hours, rather than days or weeks of wading 
through complex instruction manuals. 

NOW, YOU'RE IN CONTROL 

Designed for use by novice as well as experienced PC 
users, Compu'I utor difft-rs from manuals and other on- 
disk or on-tape tutorials in three very important ways. 
First, Compu I utor presents clear. non-"couiputerese. 
step-by step instruction; second, instruction is entertain- 
ing and imaginative; and 
third. Compu I utor s self- 
teaching technique allows 
you the convenience of 
learning at home or office, 
where worktime and 
workpace can be set to 
your individual need, 
rather than classroom 
schedule. Compu Intor is 
your personal instructor. A 
private coach anytime of 
day and as * lose as your 
\ kI.'ih assette rci i udei 





WE'RE TEACHING YOUR 
FAVORITE PROGRAMS 

Popular software for vour 

TRS-80, Model 4 doesn't 

have to be complicated. 
We've made Compu- 
lutor for the most popu- 
lar business and home 
productivity software 
piograrus available for 
your machine: "Using 
Your Machine" — gets 
you started from assem- 
bly or hookup, to learning 
to operate your machine, 
its disk operating system, 
and even writing a 
"BASIC program; 
"Using Word 
Processing" — Super- 
SCRIPSIT™- shows 
the use and application of 
the single most popular 
word processing program 
currently sold. "Using VisiCalc " — teaches basic 
properties and applications of VisiCalc, the electronic 
spreadsheet; "Using Data Base Management" — 
Profile III™ Plus — the most popular of the relational 
database programs currently sold. 

Compu Tutor makes the best software for your TRS- 
80, Model 4 perform even better because we ve made 
it easier to understand. After all. isn't that the bottom 
line? 

Get the most out of your I RS-80, Model 4 or compat- 
ible system. Start with the right learning system! Com- 
pu I utor, the power of simplicity. 

To find out more, ask your computer dealer or contact, 
Jim Brown. Embassy Home Entertainment, 1901 
Avenue of the Stars, l.os Angeles, California. 90067. 

^^^M^^X^ [^"1 developed b) ( hase Sctenlitit 

The Plain Language Video Tutorial „ios 

Marketed Exclusively by F.mbassy Home Entertainment 



CofnpoTwtnr is a trademark < In* 

Radw Shack ■ a ref Ittaed trademark ul It* I ANDY ( ( IRPORATION 

[R^.-n > , .. , ! ,.....<in...i, - art ■ • •-., 7\\|.\ c ORPORATION 
■ , - RIPSn MD\ ( ORPORATION 



I',.! I- III PI l s , „,...,!- ...in- lASIH ( ORPORATION 

•■ il track-murk »' V 
.trrtammrnl is a 5#rv»cen> - 
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Wrap-Up 

In choosing a printer, you must care- 
fully consider just what features are im- 
portant for you. If you just want good 
quality print on regular size paper and 
have little or no need for super- /sub- 
scripting, then the DMP-420 may be 
too much printer for your needs. If 
however, you need a machine with 
these kinds of capabilities, and are 
willing to spend some time learning 
how to use it, then the DMP-420 is an 
excellent printer to consider. ■ 



Open Access: 
All Together Now 



by John B. HarreU III 

Open Access is an integrated pack- 
age for the Model 2000 that 
neatly combines a data base, a spread- 
sheet, word processing, graphics, time 
management, communications, and 
utilities in a single, cohesive package. 
It's become one of my favorite soft- 
ware packages and I continually use it 
in preference to other programs. 

Open Access's seven modules oper- 
ate within the main "shell" of the sys- 
tem. You boot up Open Access, type 
in the date, and select one of the mod- 
ules from the main menu. After you 
run that module, you save your data 
to disk and either run another module 
or exit the system. 



Open Access 

***** 

Software Products International 
10240 Sorrento Valley Road 
San Diego, CA 92121 
Available through Radio Shack 
Express Order System 

Tandy Model 2000 

256 K RAM 

Two disks or hard disk 

Graphics and color (optional) 

$595 



Easy to use? 


***** 


Good docs? 


•••-fr^r 


Bug free? 


***** 


Does the job? 


****-& 



Each of the modules operates with- 
in a window on the video screen and 
different areas of a module can acti- 
vate overlay windows to display infor- 
mation on system options or module 
commands. 

Global Features 

Open Access provides several global 
features you can access from any of its 
modules, including a Help screen. 
When you invoke this screen, a win- 
dow opens on the display describing 
the module or program mode in which 
you're working. You use any of the ar- 
row keys or other movement com- 
mands to move through the help in- 
formation. 

In addition to the Help text win- 
dow, pressing the Fl key a second time 
opens a window describing all the 
Open Access function keys and the 
Tandy 2000 keys assigned to those 
functions. Pressing the escape key 
(ESC) returns you to the last window 
opened. 

If a file currently exists on your 
disk, the Search option displays a se- 
lected directory corresponding to the 
module you're in. If you're in the 
word processor, Open Access displays 
only files with .TXT and .DOC exten- 
sions. Once you highlight a file name 
with the cursor, you press the "do" 
(F12) or return key to call up a file 
name. You can't, however, call up a 
full directory or determine the file 
sizes from within the word processor. 

A macro definition feature is avail- 
able in all modules. This lets you pro- 
gram repetitive keystrokes and invoke 
them at any time. With this feature, 
anyone can accomplish even sophisti- 
cated tasks by pushing the macro but- 
ton, selecting the Execute option, and 
typing in a name. In fact, you can 
assign the proper keystrokes to one of 
the user-defined keys and execute the 



entire procedure with the press of a 
single key. 

Information Management 

Probably the most attractive feature 
of Open Access's data-base-manage- 
ment program is its simple command 
syntax. In ease of use, it even super- 
sedes that of dBase II. 

The commands are based on the key 
words From, Select, Where, and 
Order. You specify the data-base file 
from which you want to retrieve infor- 
mation with From, use Select to indi- 
cate specific fields, Where delimits 
your search criteria, and Order deter- 
mines the sort sequence. You can 
search up to five independent data 
bases for specified information. Table 
2 provides specifications for the infor- 
mation management module. 

The record-selection process devel- 
ops a virtual data base of all relevant 
records. You can manipulate this data 
base as you would any other, includ- 
ing inserting information into reports 
and letters or sending data to another 
module. 

Data-base fields can have much 
more sophisticated attributes associat- 
ed with them than the normal charac- 
ter, number, or logical fields. Addi- 
tional field attributes include date and 
decimal (contains a real number). 

More important, you can specify 
"Must Match" fields in the data base. 
The Must Match feature provides a 
safeguard against erroneously enter- 
ing data. For instance, say you have 
two independent data-base files, one 
with customer information (name, ad- 
dress, balance, and so on), and anoth- 
er with order information (customer 
name, product number, purchase 
order number, etc.). 

Now you want to record a custom- 
er's order in the Orders data base. By 
specifying the Must Match option, 



Maximum number of data bases open at a time 


5 


Maximum number of records per file 


32,000 


Maximum number of fields per record 


55 


Maximum number of key fields per record 


15 


Maximum record size in bytes 


1,024 


Maximum number of characters in text field (key) 


40 


Maximum number of characters in text field (non-key) 


59 


Maximum number of significant digits 


18 


Maximum number of search conditions 


64 


Maximum number of sort fields 


15 


Table 2. Information Management specifications. 
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Open Access will cross-check the 
must-match fields of related data 
bases; that is, it checks fields common 
to related files. In this case, it checks 
the Customer data base to see if the 
name of the customer you're entering 
in the Orders file matches a name in 
the Customer file. If it doesn't, the 
Must Match window appears on the 
screen, highlighting the name closest 
to that you entered in the Orders data 
base. At this point, you can scroll 
through the customer data base in the 
Must Match window to see if you've 
simply made a spelling error or you 
can insert the missing name in the Cus- 
tomer data base. 

You can sort fields in the data base 
by more than one criteria, too. Say 
you have a file listing all the executives 
of a major corporation and their sala- 
ries. You could sort the file not only 
by company vice presidents but by 
VPs that make over $60,000 annually. 
Also, you can retrieve records with 
fields that fall within a range you spec- 
ify. In the above example, you could 
retrieve files on company vice presi- 
dents that make $30,000 to $60,000. 

The Information Management 
module uses screen and print masks to 
display information from the data 
base in a user-defined format. The 
screen masks appear for data entry or 
information display, while the print 
masks appear only on reports. Masks 
can use a number of selection criteria 
to guarantee that only the appropriate 
information is displayed. In addition 
to selection dependencies, you can use 
masks to join files together to select in- 
formation from a virtual data base. 

Information Management offers a 
powerful Browse option. This option 
displays information from a single file 
in the data base in two windows. The 
right window displays the field names 
of the file along with the data from the 



While most spreadsheets offer a standard 

number of rows and columns, few of 

them let you use the entire sheet at once. 

Open Access doesn't have this limitation. 



current record. The left window dis- 
plays the information from all of the 
records in the file sorted into ascend- 
ing order. Cursor positioning controls 
let you select any record by highlight- 
ing the appropriate entry in the left 
window or display a list of other field 
contents by highlighting the appropri- 
ate field name in the right window. 

Spreadsheet 

The spreadsheet module included 
with Open Access offers all the 
functions of advanced spreadsheets 
plus a few extras: virtual memory for 
the worksheet and goal-seeking (see 
Table 3). 

While most spreadsheets offer a 
standard number of rows and col- 
umns, very few of them let you use the 
entire sheet at once. MultiPlan, for ex- 
ample, provides over 16,000 cells but 
requires that your sheet be resident in 
memory at once. Consequently, 
you're limited by the amount of main 
memory available. 

Open Access doesn't have this 
limitation because the worksheet is 
paged to and from the disk as re- 
quired, letting you manipulate the en- 
tire 64,800-cell work area. 

The goal-seeking feature allows for 
backward solution to a problem. 
Specify the calculation results or target 
values you want to achieve and the de- 
pendent variables you want manipu- 
lated, and Open Access calculates the 
necessary values. 



Maximum number of rows 


3,000 


Maximum number of columns 


216 


Maximum number of usable spreadsheet entries 


648,000 


Maximum number of screen windows 


6 


Maximum number of simultaneous models on screen 


4 


Maximum number of divisional levels for consolidation 


7 


Maximum number of branches for each division 


30 


Maximum number of consolidated models 


over 25,000,000 


Maximum number of named areas 


116 


Table 3. Spreadsheet specifications. 





The spreadsheet module also lets 
you name cell values (similar to Multi- 
Plan) with one significant exception: 
One named value can index another. 
This provides an exceptionally power- 
ful means of manipulating data. For 
example, the area of the sheet named 
REVNUES is indexed by YRS. There- 
fore, you can make a reference to 
REVNUES(1984) and selectively call 
the data in the REVNUES cell for this 
year. 

The spreadsheet module provides 
formatting capabilities for each cell to 
enhance your printed output. You 
have full control over the way Open 
Access displays numerical data, in- 
cluding several ways to display nega- 
tive numbers (with the + / - symbol, 
parenthesis, or a credit/debit nota- 
tion). You can also print each cell indi- 
vidually in boldface, underlined, or 
italics if your printer supports these 
features. 

The only drawback to Open Ac- 
cess's spreadsheet Is its slowness com- 
pared to dedicated spreadsheets. Also, 
the spreadsheet doesn't contain cursor 
positioning commands to allow rapid 
paging through the worksheet. You 
must depend on the repeating arrow 
keys to correctly position the cursor or 
remember the cell location and use the 
GOTO command. 



Word Processor 

Open Access contains complete text 
editing and word processing capabili- 
ties that offer most of the features of a 
dedicated software package. You can 
copy text (internally to a current file 
and externally from data files, in- 
cluding from other modules), find and 
replace text, and select printer features 
with an on-screen display of the 
boldface, underlining, and italics at- 
tributes. 

While the word processor module is 
easy to use, it's also the source of some 
of Open Access's more noticeable lim- 
itations. You can't really describe 
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them as bugs, but you could consider 
them design deficiencies. 

First of all, you're limited to a docu- 
ment width of 80 characters. This pre- 
cludes processing many documents 
that exceed this carriage width. If you 
have a printer with a 15-inch carriage, 
for example, you could print a maxi- 
mum of 255 characters on a line in the 
17 characters-per-inch mode. But with 
Open Access, your video screen is lim- 
ited to a maximum of 78 visible char- 
acters (the window border graphics 
use two characters). 

Second, your document size can't 
exceed the buffer's capacity of 31,500 
characters. This is approximately 10 
pages of single-spaced text (54 lines of 
60 characters per line). More impor- 
tant, you can't chain document files to 
produce documents longer than this 
length. Because of this limitation, 
Open Access isn't suitable for an envi- 
ronment where you would use it pri- 
marily for word processing. 

The last drawback to the word pro- 
cessing module is the lack of a spelling 
checker. A spelling checker with a 
modest-sized dictionary is a must. 

Graphics 

Open Access's color graphics are 
something to behold, and they're easy 
to develop. Your first graphics presen- 
tation in the introductory section of 
the manual is a multicolored three-di- 
mensional bar chart. 

Three-dimensional plotting is the 
most complex of the graphics figures 
and it produces a beautiful bar chart. 
But you can also produce simple pie, 
line, or bar charts. And you can com- 
bine line and bar charts to display up 
to 30 "positions" (a single data value) 
on up to 30 "levels" (collections of 
groups of positions, e.g., financial in- 
formation for an entire year may com- 
prise one level) on an overlay graph. 

You can combine line, bar, and pie 
charts to display the same 30 levels of 
data in separate windows, each having 
a different graph type with different 
colors. 

In addition to creating graphs, you 
can select from a full range of colors, 
texture, and physical characteristics of 
the plotted data. Three-dimensional 
plots let you control the tilt and rota- 
tion of the graph and you can specify 
the content of the top, side, and labels 
(including the colors). 

You can save any graph with the 



You can route graphics 

printouts to a disk file 

and include them 

in a text file 

within the word processing 

module for printing 
with your correspondence. 



Slide option. Open Access saves the 
graph and lets you recall it instantly at 
a future date. You can even sequen- 
tially combine these graphs to simulate 
a slide show, a handy feature for busi- 
ness presentations. The slide system 
allows a maximum of 32 slides. Each 
slide takes approximately 96K bytes 
(that's right — nearly a hundred thou- 
sand bytes) of disk space, so a single 
floppy disk can effectively handle only 
six slides. 

You can print out this video presen- 
tation with a graphics printer. Open 
Access already supports many printers 
and it's easy to configure others. You 
can also route graphics printouts to a 
disk file and include them in a text file 
within the word processing module for 
printing with your correspondence. 

I was able to print out my first 
graph on my Okidata Microline 92 
within five minutes of starting the 
graphics introduction. This also point- 
ed out a problem in the printer defini- 
tion file for the Microline 92. I had to 
change the graphics-initialize code to 
allow 72 by 72 dots-per-inch printing. 
Circles do not print well with an aspect 
ratio different from 1:1. 

Time Management 

Time Management is a real time- 
saver for an office manager who has 
to track many tasks or appointments. 
A perfect example where the Time 
Management module would excel 
is a doctor's office. Time Manage- 
ment schedules appointments, prints 
reminder notes by day, prints out 
schedules, and even tells you of any 
conflicts. Time Management even 
manages multiple schedules, limited 
only by available disk space. 

Another valuable part of this mod- 
ule is the rotary name and address file. 



This filing system provides a quick 
method of tracking your contacts. The 
name/address file is maintained as a 
normal data base and you can access it 
with the information management 
module. The only difficulty here lies in 
the lack of a screen mask file, which is 
normally created automatically when 
you build a new data-base file. I over- 
came this problem by creating a dum- 
my data-base file with the appropriate 
screen mask and then copying my 
name and address data base over the 
dummy data base. 

Communications 

The Open Access communications 
module proved effective in telecom- 
munications. 

Like the printer support, the com- 
munications module uses modem defi- 
nition files to define your current 
modem/RS-232 port configuration. It 
supports auto-dialing, and the defini- 
tion files already contain the configu- 
rations for the Hayes Smart Modem 
300 and 1200. Each modem definition 
file contains its own directory of 
phone numbers. This is particularly 
nice if you access several commercial 
information services that use different 
baud rates and protocols. 

The communications software lets 
you upload and download text and bi- 
nary files. The module doesn't provide 
error-checking protocol, but it sup- 
ports full XON/XOFF handshaking 
for a file transfer. 

Open Access also supports commu- 
nications with another computer di- 
rectly in either the master or slave 
modes. You can use this module to 
control another computer or have an- 
other computer take direct control of 
yours. 

Documentation 

With any complex system, docu- 
mentation is particularly important. 
My first impression of Open Access's 
software package was "Where am I 
going to put all this?" 

In addition to the software disks, 
you receive the following manuals: a 
pocket reference guide, key descrip- 
tion cards, softkey overlays, license 
agreement, the Getting Started manu- 
al, User Manual, Reference Manual, 
and the index. 

The Getting Started manual is ex- 
ceptional. The first chapter provides a 
system overview, including instruc- 
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CIRCUIT 

DESIGN 
MADE EASY 



Use your microcomputer and Programs for Elec- 
tronic Circuit Design to help you select the correct 
value lor each component in an electronic circuit. 
The programs arc adaptable to most microcomputer 
systems and arc also available on disk for the Apple. 
IBM PC and TRS-SO. The thirteen programs can be 
used individually, or they can be combined, using a 
master menu, as explained in the lx>ok. 

Topics covered include: 

• resistor, capacitor and inductor circuits 

• circuits that have combinations oi resistors, ca- 
pacitors and inductors 

• series and parallel circuits 

• voltage dividers 

• impedance and frequency 

• phase angles 

• operational amplifiers 

• transistor circuits 
Programs jot Electronic Circuit 
1 hsi^n 

Da\ id Leithauser 
$14.95 ISBN 0-88006-068 9 

softcover 7 In 9 approx. 100 pp. 1984 BK7400 

Book and Disk Packages $24.97 

Appl.- II. II » . [IeCC740011, ISBN 0-88006-079-4 

IBM PCCC740012, ISBN 0-88006-080-8 

TRS-80 Model I III CC740013, ISBN 0-880064)81-6 

In imxIit. ...II 1..II I.m I H00 258-5473 Um credil card orders Or mail your 
nrdiT wiiti ilicik or ni<iiii\ orilt-i oj complete credil card Information to: 
W'ayix Cnvn Books. Retail Sales. Peterborough. Ml 03458 Please include 
for tin- firM Item and $1.(11) lor each additional item foi shipping and 
liandliitg Wavnr Green Books .ir> also available In l>ix>k stores. Orders are 
imvalilr in is dollan unh Please allow t 6 weeks far debVery. Dealer In- 
'(iiiri»?. m\ jteu. go 




Send me copies i>t Program for Electronic Circuit Design 

(BK7400) .it $14.95 each. Send me packages for the Apple 

II. II Plus. Il«- (CC740011); pac-kam* for tlu- IBM PC 

(CC740012): packages for the TRS so Model I/Modd III 

(< :< 740013) at n24 .97 each. Shipping and handling is $1.50 tor the 
first Item; $1.00 lor each additional Item. 



Card 



Expiration date 



payment enclosed MasterCard Visa 
Signature 


Am Ex. 


Name 


Address 


Citv State 
Wayne Green Books, Peterborough, Ml 03458 


Zip 

3411B8P 
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PRINTER SALE 



ML 80 Features 

•80cps unidirectional printing 

• 80 columns standard. 
1 i2 condensed 

•TRS-80 character set 
•Graphics 64 block shapes 

• Long lite. 7- pin print head, 
warranted tor one full year 

• Friction & pin paper feeds 

• Parallel Centronics interface 



$189 




OKIDATA 



SUNLOCK SYSTEMS 
4217 Carolina Ave 
Richmond. Va 23222 

ADDITIONAL PRINTER SPECIALS 



Epson 
RX80 $299 
80FT 369 
RX100 529 
FX80 479 
FX100 649 



Okidata Brother 15 $479 
ML82 $349 Brother 25 739 
ML83 569 Gemini 10X 279 
ML84 975 Man/Tal 80 319 
ML92 429 flume H40 1349 
ML93 699 SCM TP-2+ 449 



CItoh 8510 $359 
CItoh F10 1099 
Sv.Reed 500 429 
Diablo 620 949 
NEC 2000 849 
NEC 3510 1499 



TO ORDER CALL TOLL FREE 800-368-9191 

In Virginia call 804 321 9191 

We accept MasterCard. Visa and CODs 




Let us know 8 weeks in advance so thai you won't 
miss a single issue of 80 Micro. Attach old label 
where indicated and print new address in 
space provided. Also include your 
mailing label whenever you 
write concerning your sub- 
scription. It helps us 
serve you promptly. 

Extend 
my sub- 
scription one 
additional year for 
only $24.97. 
I Payment enclosed 
Bill me 

Canadian and Mexican $27 97 1 year only. US funds 

n on US bank Foreign surface $44.97 1 year only. US 

funds drawn on US bank. Please allow 6-8 weeks for delivery 

If you have no label handy, print OLD address here. 



Please allow 6-8 
weeks for 
delivery 



Name 



2 Address 



E City 

u. 

< Print NEW address here. 



Name _ 
Address 
City 



State. 



-Zip_ 



State Zip. 

micro* 

PO Box 981 • Farmingdale, NY 11737 
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tions on backing up the disks (and 
transferring them to the hard disk) 
and how to create a self-booting 
system disk. 

The next chapter contains the sys- 
tem's demonstration. This is your first 
use of Open Access and it doesn't re- 
quire any experience. The manual 
takes you through the demo step by 
step, providing computer-generated 
responses and answers. 

The last part of the manual contains 
information for customization: se- 
lecting or adding an unconfigured 
printer, how to set up your own work 
disks, and advanced uses of the system 
utilities. 

The user manual contains detailed 
tutorial information on every aspect 
of the system. Plan on getting several 
cold beers lined up in the refrigerator 
before starting these sessions. It took 
me two evenings of concerted effort to 
complete the tutorial. 

The most pleasant part of the ses- 
sions was that everything worked — no 
mistakes or wrong turns. After the 



The user manual 

contains information 

on every aspect of 

the system. I needed 

two evenings to 
complete the tutorial. 



first chapter, I had a high degree of 
confidence in the tutorial information. 
Then, when I hit a snag, I only had to 
study the tutorial to discover where I 
went wrong. 

The overall low mark in the docu- 
mentation is the reference manual. My 
expectations were dashed when I 
opened it and found only general in- 
formation about the system, instead 
of the detailed technical information I 
had expected. Consequently, it was 
hard to determine things such as maxi- 
mum spreadsheet size and limitations 
of the word processor. 



Other Complaints 

Two BIOS problems contribute to 
difficulty with Open Access. There is a 
problem with spacing on non-Radio 
Shack line printers. This month's 2000 
Plus column (p. 174) provides a patch 
that solves this problem. 

The other BIOS problem concerns 
underlining on the video screen. In 
MS-DOS versions earlier than 
02.00.02, underlining would destroy 
the bottom of the letters. Version 
02.00.02 cures this. 

I was surprised that Software Prod- 
ucts International didn't include the 
option to print sideways down the 
page for graphics displays and wide 
spreadsheets. I can't dump the entire 
screen to my Microline 92 because of 
the 8 Vi -inch effective print length and 
72 dots-per-inch graphics capabilities. 
This yields 612 dots and falls short of 
the dot length of a screen line (640 
dots). 

Also missing is the ability to spool 
output to the printer. The computer is 
tied up and unavailable the entire time 



"WORKTOOLS 80" - AN 
INTEGRATED SOFTWARE 



FOR THE TRS-80 



TM* 



WORKTOOLS 80" is the Kernel" for a Small Business Software System 
with 3 fully file compatible programs in an Integrated Command Environ- 
ment ": Worksheet 80". a Spreadsheet Program. "Worktext 80". a Word- 
processor Program and "Workfile 80". a Data Base 

WORKSHEET 80" Spreadsheets have up to 64 columns and 66 rows 
with programmable column, row number, individual column width and 
decimal place number Any cell, row or column of cells can be defined by 
formulas including all arithmetical operators or by special functions such 
as TOTAL. AVERAGE. MAXIMUM. MINIMUM and PERCENT 

"WORKTEXT 80" features fully programmable format, indentation, 
centering, hyphenation, headers, footers, auto page numbering and 
printer control. The MERGE Function allows for Form Letters merging 
with files made by "WORKFILE 80" and the inclusion of "WORKTEXT 
80" Spreadsheets into documents. 

WORKFILE 80" features fully programmable record format and size 
and will work on Lists. Reports. Spreadsheets, or Ledgers, either created 
by it or by the other Programs in the System Has powerful "Data Base" 
commands such as SEARCH and VIEW/UPDATE 

Besides their own Special Functions and Commands all Programs 
share Powerful System Commands such as: OPEN FORMAT, DELETE, 
INSERT, COPY, MOVE, FIND/REPLACE, LOAD and SAVE. 

The soon to be available "WORKPROOF 80"— a Proof Reader and 
Dictionary Program will complement this first Module of the "WORK- 
TOOLS 80" Software System for only $39.99. 

NOW AVAILABLE FOR TRS-80 MODELS III, IV, MOD.100 32K DISK 
AND COCO 32K DISK FOR ONLY $99.99 (California residents add 6.5% 
tax) 1 So send check, money order or VISA/MC/AMX number and expira- 
tion date to: 

DIAZ ENTERPRISES 

P.O. BOX 4609 

MOUNTAIN VIEW, CA 94040 



•TRS-80 is a trademark of Tandy Corp 
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^f Power 
Problems? 



v*f , 



SURGES! 

SPIKES! 

RFI/EMI! 

UPS! 

SAGS! 

BLACKOUTS! 

BROWNOUTS! 



AEGIS* Power Conditioning Equipment ... THE SOLUTION 
Protects From Damaging Voltage Surges. Lost Data, & Costly Down Time 

0k fT~TTT\ SPIKE-SPIKER' 

llln ■ ■ ■ ■ Transient Voltage Suppressors & Noise Filters 
■ !■ ■ ■ 1 Eleven Models — All Models Rated 120V, 15A 

^W^^^^_) Deluxe Power Consett-?- stage transient absorber dua. 

\ew 5- stage filter, common & differential mode protection. 

nano seconds response, clamping at 150V. 8 individually switched sockets. 

fuse_d main switch; 7 cord and status lite $89.95. 

Quad Power Connie -6 stage transient absorber, dua 1 
5- stage filter, common & differential mode protection, pico 
second response, clamping al 131V; four outlets, fused, 
master switch. 7' cord and status light $75.95 

tmw-Direct AC Plug-In, 2 -stage transient absorber, dual 
3-stage filter; common & differential mode protection; nano 
second response clamping at 150V two outlets and status 
lite $44.95 

LINE-SAVER™ 

Standby Uninterruptible Power System 

—Cleen Reliable Power System— 

We4$\ LS-240-240 watti-VA capacity, increased back- 
up time: 11 min. full load. 27 min. V? load 43 mm 
Vi load; 4-AC outlets. 3-staged transient protection; dual 4-staged RFI/EMi filter 
sealed rechargeable internal battery master control switch; test switch, exter 
nal fuses, detachable 6' cord, external DC connectors for mobil use and ex- 
tended hold-up time many more exclusive featu'es $485.00 

Call or mite lor Iree literature INSTANT ORDER LINE 

Dealer inquires invited 800-524-0400 TWX 501-651 2101 

IN PENNA 215-837-0700 




n 



485 



6584RuchRd . 1*. 80 ■ 
Bethlehem PA 18107 ■ 



PA Res add 6". sales tax. tor COO add $3 00 + 
shipping & handling All pre-paid SPIKt SPIKER 
oiders freight allowed All LINE-SAVER orders add 
$10 00 shipping & handling 
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you are printing. This would be a 
welcome addition. 

One last complaint — Open Access 
doesn't let you execute any DOS com- 
mand from within the system. You 
must exit the system and then return to 
perform any command whose func- 
tion is not provided in Open Access. 

In Conclusion 

Is Open Access worth it? In order to 
approach its capabilities, you would 
need to purchase the following pack- 
ages: dBase II ($595), MultiPlan 
($249), WordStar ($495), and Video- 
tex Plus ($49.95) for a total of $1,389. 
You still wouldn't have graphics capa- 
bility and the above software packages 
don't communicate with each other. 

Even with the limitations men- 
tioned throughout the review, Open 
Access provides more features than 
the packages mentioned for the same 
price as dBase II alone. 

However, Open Access is definitely 
not for everyone. I certainly could not 
recommend it to anyone who planned 
to use it as the sole word processor 



where documents of any magnitude 
are processed. It just isn't capable of 
handling the job. And if spreadsheet 
speed or large printed graphics are re- 
quired, then the system does have its 
shortcomings. ■ 



Learning a New Language 
With Akor's C Compiler 

by John B. HaireD III 

Alcor's C compiler is a superior 
product and a welcome addition 
to my software library. While its docu- 
mentation could be better organized, 
it nevertheless gives you a well-round- 
ed foundation in the C language. 

Alcor C gives you an alternative to 
Pascal, Assembly language, and Basic, 
providing the structure and power of 
Pascal with the manipulative capabili- 
ties of Assembly language and the 
logic of Basic. Even though C is a 
medium-level programming language, 



you can write complex functions that 
directly access the computer's hard- 
ware, something you'd normally have 
to resort to Assembly language to do. 



Alcor C Language 
Compiler 

**** 

Alcor Systems 

13534 Preston Road 

Suite 365 

Dallas. TX 75240 

Models I and in, 48K RAM 

Model 4, 64K RAM 

Two disk drives (preferred) 

$249.95 



Easy to use? 


•***tr 


Good docs? 


••••# 


Bug free? 


••••«& 


Does the job? 


***-&-& 



RIBBON SALE 



EXACT REPLACEMENTS 



NEW PRINTERS ADDED! FIND YOURS BELOW. 
Good This Month 

RADIO SHACK • CENTRONICS • COMMODORE • EPSON • ANADEX • BASE 2 • IBM • NEC • C. ITOH • DEC • OKIDATA • OTHERS 



PRINTER 

MAKE. MODEL NUMBER 

(Contact us if your prinlar is 
not listed. We can probably 
RELOAD your old cartridges 1 



DIABLO 610r»2O-XEROX MEMOR YWRITER 610VM0 

BASE 2 ■ DIP 81/82/64/85G 

C ITOH Prowrlter 1 550/8510 - NEC 8023/8025 

APPLE DMP ■ DEC LA50-RA 
C ITOH Slarwrlter F1 OVCARBON FILM BLACK 
DIABLO HYTYPE II A FABRIC BLACK 

RADIO SHACK 

CARBON FILM DWP-210 
DAISY WHEEL ll-DWP-410 
Rad, Graan, Blua, Brown 
FABRIC (Long Life) DWP-210 
DAISY WHEEL II 
LP III IV 700 Zip Pack 

CENTRONICS 730/737/739/779 
DMP-200, 120 
DMP 500 

DMP 2100 - TOSHIBA P1340P1350 
LP III V 
DMP-400/420, LP VI VIII 

DMP 1 00. LP VII Commodore 152S. Gorilla Banana 

OKIDATA PACEMARK 2350-2410 Black 
EPSON MX/FX/RX 70/80 • IBM PC 
MX/FX/RX100 IBM PC 
COMMODORE 8023P CENTRONICS 152 -2 
ANADEX 9000 Saries 



Black (1445) 
Black (1419) 
Colors (1419) 
Black (1458) 
Black (1449) 
(1413) 



(1483) 
(1482) 
(1442) 
(1414) 
(1418) 

1 1*24) 



RIBBON 
SIZE 

Inches 

by 
Yards 



INSERTS EZLOAD- 

DROPIN.NO WINDING! 
EXACT REPLACEMENTS 

made in our own shop 
Cartridges not included 



S15/3 $54/12 $288/72 



$15/3 
$24/6 
$21/3 

$24/6 
$24/6 
$30/6 
$21/3 
$21/3 
$12/3 



$54/12 
$42/12 
$78/12 

$42/12 
$42/12 
$54/12 
$78/12 
$78/12 
$45/12 



$15/3 $54/12 

$15/3 $54/12 

$15/3 $54/12 

$15/3 $54/12 

$15/3 $54/12 



$288/72 

$234/72 
$510/72 

$234/72 
$234/72 
$288/72 
$510/72 
$510/72 
$252/72 

$288/72 
$288/72 
$288/72 
$288/72 

$288/72 



$30/3 
$15/3 
$18/3 
$15/3 
$18/3 



$108/12 $576/72 
$54/12 $288/72 



$66/12 
$54/12 
$66/12 



$360/72 
$288/72 
$360/72 



RELOADS 

You SEND your used 

CARTRIDGES 10 us We 

put OUR NEW INSERTS 

in them 



$7/1 
$7/1 




$6 aa 2 or more 
$6 ea 2 or more 


16 aa 

$8/1 

$5ee 
SSaa 


3-11 

3-11 
3-11 


$4Ml2ormore 
$7 ea 2 or more 

$4 ea 12 or more 
$4 •• 1 2 or more 


Maa 


3-11 


$5 •• 1 2 or more 


$8/1 




$7 ea 2 or more 


$8/1 




$7 ea 2 or more 




$7/1 
$7/1 
$7/1 
$7/1 




$6 ea 2 or more 
$6 ea 2 or more 
$6 ea 2 or more 
$6 ea 2 or mora 


$7/1 




$6 ea 2 or more 


$20/1 
$7/1 




$18 ea 2 or more 
$6ea 2 or mora 


$8/1 




$7 ea 2 or more 


$8/1 




$7 ea 2 or more 


$8/1 




$7 aa 2 or more 



NEW CARTRIDGES 

(Irom the various 

manufacturers Subiect 

lo availability ' I 



$15/2 $42/6 $ 72/12 

$30/2 $87/6 $168/12 

$15/2 $42/6 $ 78/12 

$18/3 $80/12 $348/72 

$18/2 $51/6 $ 96/12 

$18/3 $60/12 $348/72 

$18/3 $80/12 $348/72 

$21/3 $72/12 $420/72 

S18/2 $51/6 $ 96/12 

$18/2 $51/6 $ 96/12 



$27/2 
$24/2 
$15/2 
$15/2 
$15/2 
$16/2 

$14/2 
$18/2 



$81/6 
$72/6 

$42/6 $ 

$42/6 $ 

$42/6 $ 

$48/6 $ 
$32 Each 

$36/6 S 

$51/6 $ 



$162/12 
$144/12 



78/12 
78/12 
78/12 
96/12 

66/12 
96/12 



SILVER DOLLAR 

WIND M LOAO 
WHY DO WE SELL THESE? 
This is the type ribbon you 
gel il you order Irom our (el 

low advertisers We sell them 
tor less since we make them 
ourselves Do you really like 
the mess and inconvenience 
ot unwinding and dumping 
this type ribbon into a waate- 
basket or out on a newspaper 
andVo' winding it into you' 
canridge^Wedont know why 
these are being sold Com 
puters should Simplify your 
life, not make it more com- 
plei iust to save a few pen 
nies You are welcome to 
order these if you cannot at 
ford our EZLOAO"* IN 
SERTS. RELOADS, or NEW 
CARTRIDGES But BEWARE 1 
You now know how to avoid 
disappointment One more 
caution be sure to check the 
length of any ribbon BEFORE 
you but if For instance, an 
MX 100 ribbon should be 30 
yards long, not 20 as in the 
MX 80 

$12/3 $44/12 $252/72 
$11/3 $40/12 $228/72 

0« I OAK* (KKK 

i>T«e* «'«• 

$48/12 $84/12 

$12/3 $44/12 $252/72 
$15/3 $54/12 $288/72 



WORRIED ABOUT ORDERING BY MAIL 1 Relai We've been in business lor many years and can plea** the smallest and largest ac 
count* You receive eome ol Ihe Kneel ribbons available made of our own exclusive IMAGE PLUS * "" fabric end carbon film Our rib- 
bons III your printer exactly. COMPARE, but BEWARE! We order all our competitor' » products and are emated at what we gat. We uee 
Ihe latest state-of-the-art production equipment and are blessed with a line, dedicated stall. We guarantee eve** thing ere make. 
period Out ribbon* »ra made itaah dally and out goal la to ship your order within 24 hours Writ* for our brochure and price list 



COST PLUS 10% 

RADIO SHACK COMPUTERS-SOFTWARE SUPPLIES-ACCESSORIES 

Call Bob C*%9 or writ* tor our COST PLUS 10% FLYER!!! 



■&U 



SEND CHECK. MONEY ORDER OR C O TO 

BCCOMPCO 

800 South 17 Box 246 

SUMMERSVILLE. MO 65571 

(417)932-4196 



,^152 



WE PAY UPS SHIPPING on PREPAID ORDERS 

PLEASE INCLUDE STREET ADDRESS lor UPS DELIVERY 

FOREIGN ADD 15% U S FUNDS 



• See List of Advertisers on Page 176 
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The Software Package 

The software comes on two disks 
(Model I users will find four single- 
density disks). The package includes a 
Blaise editor, the C compiler itself, a 
linkage editor, run-time libraries, an 
advanced development package, and 
full documentation. The disks also 
contain the source code for some of 
the more esoteric C functions, such as 
printing and scanning and the C li- 
brary. 

The Text Editor 

The Blaise II editor that comes with 
the C compiler is excellent. You use it 
when you initially type in your pro- 
gram or edit a program you've previ- 
ously typed in. 

One of the editor's exceptional fea- 
tures is its ability to reconfigure itself 
through a terminal definition file 
created with the editor's SETEDIT 
utility. Not only does this file contain 
the key definitions for the normal edi- 
tor commands, but you can redefine 
any key. For added power, you can 
develop macros and assign them to 
any key, and you can chain and nest 
one macro to another. The documen- 
tation's sample editor setup file dem- 
onstrates many SETEDIT features. 

The editor's text buffer is limited to 
approximately 15,000 characters. Not 
a large program by some standards, 
but adequate when you consider that 
C demands modular development. Al- 
cor C fully supports modular program 
compilation and separate file linking 
with the linkage editor. 

The Compiler System 

The Alcor C compiler reads source 
code and generates an object file in 
p-code. After this translation, you can 
execute the p-code file directly or 
through what Alcor calls its Advanced 
Development Package (ADP). With 
ADP, you can use an Optimize utility 
that further processes the p-code, re- 
moving all redundancies in the first- 
generation object code (this generates 
a file up to 30 percent smaller than the 
original object file). An optimized file 
generally runs faster than the original 
p-code version. 

The optimization is generally peep- 
hole — it looks only at the code and the 
local effects, without attempting to 
analyze expressions and large blocks 
of code. This is an effective way to re- 



The Blaise II editor 

that comes with the 

C compiler is excellent. 

One of its exceptional 

features is its ability 

to reconfigure itself 

through a terminal 

definition file 

created with the 

editor's SETEDIT utility. 



duce most of the compiler-generated 
overhead in the p-code program. 

Alternatively, you can use ADP's 
CODEGEN (code-generator) utility. 
It takes a p-code object file and writes 
a machine-language file from it. This 
produces a file that executes three to 
five times faster than the original ob- 
ject code. However, the translated 
output file isn't a true machine-execut- 
able file. Close examination reveals 
that CODEGEN controls its environ- 
ment closely and toggles into the inter- 
pretive mode when it must execute a 
function too complex for in-line code 
generation. When finished, it toggles 
back to the host mode for execution. 

The compiler, optimizer, and code 
generator all have a serious common 
deficiency. While each outputs code as 
an ASCII character file, each hexadec- 
imal byte is represented by two ASCII 
characters! Simple arithmetic tells you 
that any sizeable program will use up 
the remainder of your disk space 
quickly — you'd need 20K bytes to 
store a 10K program. 

The Alcor C compiler itself doesn't 
generate true machine-executable code 
as do most others. The most obvious 
result of this is slower execution. Per- 
sonally, I feel this is far offset by the 
ability to link C language routines with 
Pascal, Basic (compiled with Alcor's 
MultiBASIC compiler), or Assembly 
language (assembled with Alcor's as- 
sembler). All these language transla- 
tors generate identical object files and 
are compatible with one another. 

You can compile and run many 
programs right away. If your routine 
doesn't require other routines, the 
RUNC run-time interpretive environ- 
ment provides all the system routines 



required. If your program uses other 
separately compiled functions, you 
have to use LINKLOAD to link all 
routines and the appropriate system 
functions together. LINKLOAD also 
saves the entire program and all linked 
functions with the run-time environ- 
ment as an executable command file. 

The compiler system is supported 
by seven libraries of functions: the sys- 
tem library contains the run-time sys- 
tem interface routines and low-level C 
functions; CLIB contains most of the 
standard C library functions; PRINTF 
and SCANF contain the object code 
for those respective functions; TRS- 
LIB provides functions for those 
features common to the Model 4 or 
TRSDOS 6.X; Random supports ran- 
dom-access file input and output; 
Strings contains the dynamic string- 
handling routines. 

Alcor has imposed a unique restric- 
tion on the C language. C specifies 
that any function returning a result 
other than an integer must be specifi- 
cally declared by type in the external 
declarations of the calling routine. 
Alcor's implementation of this re- 
quirement is to invent a new data type, 
called Void, for those functions not 
returning any value. 1 found this 
limitation the single most limiting fac- 
tor in transporting software from oth- 
er C compilers. 

Documentation 

No software package of this magni- 
tude is any good without adequate 
documentation to back it up. Alcor C 
has the documentation to support all 
facets of the system's operations. 

The documentation is contained in 
a large (9- by 12-inch) three-ring 
binder in a shelf storage box. This 
sturdy exterior contains a wealth of 
documentation — over 500 pages of 
detailed description of the compiler 
system and text editor, complete for 
beginners to advanced users. 

The manual is divided into six sec- 
tions: one for beginners, one on the 
editor, a system section, a tutorial, a 
reference division, and an explanation 
of the Advanced Development Pack- 
age. The beginner's section takes you 
through the steps necessary to create 
your working compiler system's disks. 
It also contains a simple introductory 
session with the compiler, The editor 
section is also the full reference section 
for the Blaise-U editor. 
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DISKETTES 

*18.50 SS/DD 



(10 Disks/Box) 



5 W SS/DD $18.50 

5 W DS/DD $23.50 

Wbiion DMOlpton Pr1c« E«ch 

APPLE DOT MATRIX $4.29 

(Sam* m NEC8023) 

C.ITOH PROWRITER 1550-8510 $4.29 

(Same m NEC8023) 

EPSON MX 70/80, FAR 

SERIES RIBBON CARTRIDGE $3.85 

EPSON MX 100 RIBBON 

CARTRIDGE $499 

NEC 8023 $4.29 

OKIDATA 80/82/83/92/93 $1.85 

OKIDATA 84/94 $2.99 

Satisfaction Guaranteed Since 1967 

Call (415) 778-2595 

or write: 

Argonaut Distributing 

1104 Buchanan Road #80 

Antioch, CA 94509 

VI»«/MC/Pr»p«ld — 83.00 •Npptng 

C.O.D. Ord«r» — $4.90 ahlpplng 

-3 

Authorized Distributor 
Information Processing Products 



Turn Your Model 4 into a 

SUPERCOMPUTER 



With SUPCRM0D4. rh« TRS 80 Model 4 Resource [Mutt, 
and ANY Model 3 DOS you can now have: 



SUPERVIDC0 

• 80x24. 40(24. 64x16 and 32» 1 6 screen formats fully supported. 

• prtnt(3), print taWI. set. reset, point and all video commands 
completly compatible with all screen sues 

• reverse video, scroll protect to 24 lines, and many more video 
features included 

SUPERKEYBOARD 

■ audibie keyclick positive feedback foi accurate typing. 

■ easily programmable special function keys 

SUPERPOWER 

- 14K print spooler Now you can print while your computer does 
something else 'spooler can even be resumed after a re boon 

■ literal print mode send unaltered graphics codes to your printer 

SUPERSPEED 

■ 4MHi CPU clock speed all your software runs twice as fast 

■ realtime clock and all interrupt driven routines operate at the correct 
rate, regardtess of CPU speed 

SUPERMEM 

. all SUPERM004 features use NO USER MEMORY! 

That's right! Not one byte of your memory is touched! 
SUPERC0MPATI81E 

• Works with any model 3 OOS no need to convert your programs 
to a model 4 DOS or give up your favorite DOS s features 

■ works with ail software that use the normal I'O drivers 

■ requires no software or hardware patches 

SUPEREASE 

• all features are user selectable Pick the options and set them up 
your way All features controllable from OOS or your programs 

• complete documentation for both users and programmers 

* features too numerous to list, send tor details 

^148 



TO 



SpatctaJ Introductory P»»C« 

$49 95 



2 1 r „,„|,i„ :i u, „.» 

CI.. Htfi N.~ Vo* 1 1 l*t 

Mli 46? SS70E.I • 



. lm>> ».o hi 
hm »hipp«nfl ■ 
HtS i. -..it. ii^ 
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TRSDOS— CP/M 



reformaTTer 

Model II Users! 

Convert files between 
TRSDOS and CP/MI 

■ REFORMATTER runs under TRSDOS 

■ Operates on single drive system 

■ Converts in both directions 

■ CP/M operating system not needed 

■ ALL TRSDOS record lengths sup- 
ported 

■ Initializes blank CP/M diskette 

■ Displays or dumps CP/M files 

■ Manipulates CP/M directory under 
TRSDOS 

■ $249.00 from stock. 

CP/M-IBM, TRSDOS— DEC, and CP/M — 
DEC versions of REFORMATER also 
available at $350.00 from MicroTech Ex- 
ports, Inc., 467 Hamilton Ave., Palo Alto. 
CA 94301 

□ Tel: 415/324-9114 TWX: 
910-370-7457 MUH-ALTOS 
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UNINTERRUPTIBLE POWER SYSTEMS 
BY SUN RESEARCH 



For complete protection from Blackout, Brownout, 
Surge and Spike specify a MAYDAY Uninterruptible 
Power System by SUN RESEARCH. 

Eliminate costly downtime and lost data caused by 
those momentary power losses. Protect your software 
and hardware from damage caused by sudden drops 
in line voltage. Isolate your computer system com- 
pletely from the AC wall circuit with a MAYDAY 
continuous (On-Line) Uninterruptible Power System. 
Give all your components clean 60Hz sine wave 
power for efficient operation at a price you can afford. 

MAYDAY™ UNINTERRUPTIBLE POWER SYSTEMS 
BY SUN RESEARCH 

Available in 1 50, 300, 600. 1 000 and 1 500 VA Capacities. 






Call 1-603-859-7110 

MAYDAY"' Division 
SUN RESEARCH, INC. 

Old Bay Road 

Box 210 

New Durham, N.H. 03855 
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The System Implementation section 
provides specific information on Al- 
cor's particular version of C. It con- 
cerns the host computer system that 
the compiler runs on: the memory use, 
how to compile and execute programs, 
and explanations of many of the sys- 
tem functions that are available. 

The tutorial section is well-done. 
It's written for individuals without C 
experience but with some knowledge 
of a computer language. This is one of 
the only C compilers that doesn't re- 
quire you to buy an outside reference 
for the language; the tutorial provides 
adequate instruction for most users. 

The reference section provides a de- 
tailed guide to this implementation of 
C. It also documents the many other 
functions available with your C source 
program from the other libraries not 
addressed in the System section. All 
compiler preprocessor features and 
options are addressed in detail. 

The last section documents the 
Advanced Development Package, 
consisting of the optimizer and code 
generator. This provides a detailed de- 



scription of the object file's format 
and the Assembly language structure 
and format. 

There are two problems with the 
documentation. First, there is a phe- 
nomenal amount to digest. Second, 
the organization is poor. For example, 
the documentation of the functions 
contained within the various libraries 
is spread out over two chapters. Fur- 
ther, there is no clear, well-highlighted 
distinction marking the division of 
functions in the libraries. Subsequent- 
ly, I found it difficult to remember 
which library satisfied the various pro- 
gram external references while link- 
loading the compiled code. On several 
occasions, I loaded too many of the 
libraries while looking for the correct 
functions. 

System Performance 

Based on my experience with My- 
sosis's LC compiler and on compara- 
tive tests I made between the two com- 
pilers, two things are immediately evi- 
dent: Alcor C will never win any 
Olympic medals for speed nor will it 



claim fame as "slim, trim, and racy." 
But Akor C does provide a distinct 
advantage over other C compilers 
when you consider the amount of time 
spent compiling the program. Because 
Alcor C compiles directly to p-code, it 
involves no overhead for lengthy as- 
semblies of the intermediate Assembly 
language. 

Conclusion 

Alcor C is a substantial product 
that complements and substantiates 
Alcor's other software. In addition to 
providing a compiler that works well 
with their powerful Pascal and Basic 
compilers, Alcor's C compiler is a full, 
robust implementation of the lan- 
guage that will satisfy most needs 
completely. 

Alcor is reasonable about using 
their compilers to produce software 
for resale. You can resell an executable 
program file without paying a royalty; 
you're only required to indicate that 
the program contains the Alcor C run- 
time support package. 
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OMNITEK COMPUTERS INTERNATIONAL, INC 

1300 MAIN STREET TEWKSBURY, MASS 01876 

(617)851-4580 



OkkUuMkro<lne82A I20CP5 

OUdauMfcroMMSJA I20CPS 

Okldata MIcroHnc 84 200 CPS— 

Okldata mlcroane 92 ( I M CTS.) corresponds mode.. 

OkkUu MIcroHnc 93 1 60 CTS 

New BX-80 Printer SO CTS 

1 3 " Green Monitor 

I.M.C. 1 3 ■ Color Monitor 

Epson 1X80 



319.00 

539.00 

-799.00 
-419.00 

.689.00 



txso f.T. 
rx ioo 



.439.00 

.269.00 
525.00 

.3 15.00 



M>l 6 1 00 Parallel Daisy Wheel 

Star Powertype Daisy Wheel ( 1 SCPS). 



CotumbU (IBM compatible I Commodore. MM 

CaH for Actrlx Portable. Epson. QXIO 
40 track economy isrtve Power S upply wtth case- 
Tandon drives wtth Power Supply and case 
40 track sfcsgtehead 



.399.00 
CAU. 



dual head- 



oO track shnjlehead.. 



dual head.. 



5.25 Power Supply and ci 



■BASF 40 track D.O. 5tt" new dtafc drive. . 

no return...—....—.......... - 

8" Power Supply and case— 

Call for popular D.W. Printer Prices 
Epson EX 1 00 Prbtfv 



.7 5.00 or 10 roroOO.OO 



$699.00 



OMNITEK COMPUTERS INTERNATIONAL, INC. 

TRSSOisareg trademark or Tandy Corp Prices are lor mall order only TERMS 

Check money o'det Maste'catd and Vis* accepted (06 Tewksbuiy fteighi e« 

Ira Minimum 15 00 S &. M Mass residents add SS sales tan Write for FREE 
CATAIOC ^ m 
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• • NEWDOS/80™ Users • • 
Four NEW Utilities for NEWDOS/80 
Versions 2.0 and 2.5 

DIRSORT — Alphabetize a disk's directory ON THE DISK! 
Make searching through a large "DIR" listing a breeze! 

UNKILL — Restore a KILLed file, automatically! A long 
awaited and much needed utility. A lifesaver! 

DFLIST — Display a listing of a disk's KILLed files. These are 
the candidates for the UNKILL utility. 

RAMSPOOL — Put printing in the background. Use the 
computer's memory as a printer buffer. A real timesaver! 

Each of the utilities is fully Model 1/11/ 
and Hard Disk compatible. 

SAQ95 

All for only "T^r 

(please add $2 per order for shipping and handling) 
California residents add 6^0 sales tax 

To order, send check, money order, or charge card information 
(MasterCard or Visa) to: 

SOFTWARE SUCCESS 

P.O. Box 1043 • Windsor, CA 95492 ^ 55 

These utilities are written and produced by NEWSOFT Products 
and Software Success with the knowledge and cooperation of 
Apparat, Inc., the exclusive copyright holder of NKWIX)S/80 
Versions 2.0 and 2.5. Support and update services are solely the 
responsibility of NEWSOFT Products. 
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Introduction to 
TRS-80 Data Files 

Learn by doing with this 
guide to writing a data 
base manager This 
book, with its 
accompanying software, 
takes you through a 
simple mailing list 
program to teach you 
about sequential and 
then random access 
files. The construction of 
a DBM and the tech- 
niques for moving data 
to and from disks are 
discussed Book and 
TRSJOdisk. $24.95 
CC7398, 102 pp. 
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Low Cost Costing 

Product Costing 

with Your Microcomputer 

Low Cost Costing can 
save small businesses 
thousands of dollars. 
Decision makers who 
need to find product 
costs quickly and 
accurately can get a 
handle on manufacturing 
costs. Step-by-step 
instructions explain how 
to find product costs 
using profit and loss 
statements and a TRS-80 
All the programs are 
included on the disk that 
comes with the book. 
$24.95, CC7403, 94 pp. 



TRS-80 as a Controller 

Learn to control outside 
devices with a TRS40. 
This book is an intro- 
duction to interfacing, 
with simple, inexpensive 
projects. Applications 
include controlling lights 
and switches, building a 
small computer, and 
suggestions for more 
complex protects. The 
book applies to the 
Model III and, with minor 
conversions, to the 
Model I. $12.95 BK7394 
192 pp. 



The Rest of 80 

Get the 80 Micro articles 
so good we put them in a 
book. These 31 never- 
before-published 
tutorials and utilities 
were hand-picked for 
Model I and Model III 
users. You'll get graphics 
sorts, renumbering, 
Pascal tutorials, and 
more. Both BASIC and 
assembly-language 
programs are included. 
Complete listings are 
given, with photographs, 
schematics, and 
examples $9.95 BK7392 
232 pp. 



TRS 80/280 Assembly 
Language Library 

Learn to use assembly 
language on the Model I 
to its full capacity Two 
TRSDOS-compa tible 
disks are included, with 
programs worth many 
times the book's cost. 
You'll learn about TRS-80 
hardware and software, 
general 280 routines, and 
TRS-80 utility programs. 
Examples show you how 
to apply the information 
to your everyday 
programming Model III 
conversions are given. 
$4 50 shipping and 
handling $34.95 BK7395 
355 pp. Disks included 
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Computer Carnival 

For the Models I and III. 
These sixty programs for 
beginners will entertain 
and educate. Children 
will find mazes, word 
games, graphics, 
puzzles, and quizzes. 
Card games, logic tests, 
word and number 
quizzes, and letter 
guesses make Computer 
Carnival a learning 
experience. The Carnival 
Companion cassette of 
all sixty programs is also 
available Computer 
Carnival and Carnival 
Companion $24 95 
CC7389 Computer 
Carnival $16.95 BK7389 
218 pp. Carnival 
Companion $9.95 
TP7389 



TEXTEDIT 

Build your own word 
processor with the 
TEXTEDIT kit. This Disk 
BASIC system is built in 
modules, so you can 
modify them or use only 
the parts you need 
Features include 
complete editing, search, 
replace, and count, and 
upper/lowercase typing 
on an unmodified Model 
I. Model III users need 
the TRSDOS CONVERT 
utility to use the disk. 
TEXTEDIT is compatible 
with any major DOS. It 
operates with one drive; 
two drives or copy utility 
needed to transfer 
programs to system disk. 
Book and disk package 
$24.97 CC7387 



Nanos System 
Reference Cards 

No more flipping through 
the TRS-80 manuals to 
find information you 
need Nanos System 
Reference cards are 
pocket-sized summaries 
for your quick, easy 
reference Find such 
information as BASIC 
commands and instruc 
tions, ROM routines, 
reserved words, and I/O 
instructions TRS-80 
Model I BASIC & 
Assembler, FC1002, 
$4.95. TRS-80 Model III 
BASIC & Assembler, 
FC1003. $5.95, TRS40 
Model II BASIC & 
Assembler, FC1005, 
$5.95. Z80 Micro- 
processor, FC1011, $4.95 



Speech Systems 
tor Your 
Microcomputer 

A solid introduction to 
voice technology. For 
industry, education, or 
home use, this book 
presents many examples 
ot voice input/output 
using microcomputer 
systems Includes 
buyer's guide, along with 
over 100 pages of manu 
facturer's data sheets, 
with companies' 
addresses and phone 
numbers A glossary 
defines speech tech 
nology terms. $14.95, 
BK7406. 254 pp.. NEW. 



Programs for 
Electronic Circuit 
Design 

Electronics engineers 
and hobbyists will wel- 
come this guide to elec 
tronic circuit design with 
a microcomputer Each 
chapter contains a pro 
gram involving several 
different types of appli- 
cations that use the 
same electronic compo- 
nents. The programs can 
be used individually or 
combined into one large 
program with a master 
menu, as explained in 
the book. Software 
included. $14.95, CC7411, 
128 pp. 

.-68 



For credit card orders, call toll tree. 1-800-2S8S47X Or send your order on a separate piece or paper to Wayne Green Books. Retail Sales. Peterborough. NH 03456. Be sure to include 
the book title, order number, and price. Postage and handling is $1.50 lor the first book. $1 00 lor each additional book Foreign air mall is 1 10.00 per book. Check, money order, or 
complete credit card information must accompany your order Orders are payable in US dollars only Please allow 4-6 weeks lor delivery II you have questions about your order, write 
to customer service at the above address 
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If you design software that's time- 
sensitive or space-limited, Alcor C 
isn't for you. The residue from the 
compiler is important — that is the 
auxiliary files necessary to produce the 
end product. In order to produce a 
machine-code program file, the sys- 
tem must create an object file (1,422 
bytes) and a code-generated file (2,557 
bytes) in addition to the source code 
file and the 25,244-byte command file. 
There's no way to avoid the size of the 
latter file — even a minimal program 
(main( ) { }) requires 23,427 bytes to 
load the proper run-time support 
routines. ■ 



Basrum's Software Library 

by Wynne Keller 

Basrum is a linking loader and li- 
brary manager utility for Model 
I/Ill Basic programmers. You create 
and name a library of subroutines with 
it, then call them into Basic programs 
as needed. I found Basrum convenient 



Basrum is convenient and useful. It saves time for 
the programmer, disk space for the computer, 
and speeds up execution of a Basic program. 



and useful: It saves time for the pro- 
grammer, disk space and memory for 
the computer, and speeds up execu- 
tion of a Basic program. 

Basrum is written in machine lan- 
guage and occupies the top 1 ,600 bytes 
of RAM. The disk provides a different 
version of Basrum for each system 
memory size it supports (16K, 32K, 
48K), and two extra versions for 48K 
machines that reserve 400 bytes and 
2,048 bytes for upper memory hard- 
disk drivers or other machine-lan- 
guage software. And it's guaranteed 
to work with your DOS. 

Getting Started 

Basrum is shipped on a disk without 



a DOS, so you have to move the Bas- 
rum files to the DOS of your choice 
using the Debug utility. You can't 
transfer files directly with some 
DOSes. In such cases, you have to use 
TRSDOS as an intermediate step. At 
first, I had some difficulty with this 
process. I entered the appropriate 
command and pressed the enter key, 
but the program ignored the com- 
mand. 

Finally, after much trial and error, I 
pressed the break key. The computer 
then executed the commands and 
moved the files as requested. I was 
able to transfer all the programs using 
this two-step sequence (hitting the en- 
ter and break keys). According to the 
manufacturer, no one else reported 



PLOTTER KIT 



$•) pqOO Shipped Prepaid 

-*•»*▼ Conl USA 

X, Y PEN PLOTTER WITH 
PROFESSIONAL FEATURES 



• 16" i 11 PLOT AREA 

• 00b RESOLUTION 

• SOFTWARE LISTING 



• 17 i 60 MEDIA 

• 2 IPS 

• DISKETTE OPTIONAL 



Interfaces with any Z-80 BASED com- 
puter with accessible I/O port such as 
TRS 80* MODELS I, III. IV LOBO S* 
MAX 80 and LNW* All mechanical 
and electronic components supplied 
Full documentation and assembly in- 
structions No machining, simple hand 
tools to assemble Electronics avail- 
able assembled and tested Full ASCII 
library of 91 alpha numerics lines and 
centered symbols in variable height 

and rotation 

Write or call lor 

full information 



MODEL 

SPL 1200 



JUSTIN. INC. 

2663 LEE ST.. 80. EL MONTE. CA 91733 
(111) 444-4516 

• Register* trademark ol TANDY Cofp LOflO and LNW 
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TRS-80 1, 2, 3, 4, 12, 16 
CPM XENIX 



Multiple Regression 

Stepwise 

Ridge 

All Subsets 

Backward Elimination 
Time Series Analysis 
Descriptive Statistics 
Transformations 



" Survey Research 
" Nonpararnetrics 

• X-Y Plots 

• ANOVA 

" Random Samples 
" Data Base 
" Search & Sort 
" Hypothesis tests 



Please call TOLL FREE 
1-800-334-0854 (Ext. 814) 




for more information 

or write 

Quant Systems ^194 

Box 628 

Charleston. SC 29402 

VISA-M/C Accepted 
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Move pieces with arrow keys or Joystick. 
Activate an option .with a aingla kay depreaalon. 

vi rsaiiu piaying MOQ! s 

IO aklll level*. Adaptable Tournament Level. 
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over 40 utcuiiQM OPiiyiis 

Swap Sides. leke Beck Moves to eny depth. 

Set Up Position. Suggeat Move, 

Change Tournament Clocks. Move Cursor Speed, 

Geme Review. Meyer va Meyer. Main Verlatlon. 

Algebraic end Oeecriptlve Notation, 

Seve/Load Games on Disk. Print Board/History,... 

Progiem dlekette and manual only efiO.OO. 

Requires 481 Model l/lll or 64* Model V4P disk. 

Meese specify your TRS SO model when ordering 

Send check or money order toi 

'Rapidunamic 

—L-Jl—Jj SOFTWARE, INL. 

14368 Uyei Street Sytmar . California. 91342 

Try theee other full-featured stretegy games: 

Tournament Reveral ... •40.00 

Move-Perfect 3-D ric-Tac-Toe ... e3B.OO 

Olecounte available for multiple purcheeee. 
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this problem, so you may or may not 
encounter it. 

Basrum manipulates computer 
memory extensively. After you load 
Basrum, it protects an area of low 
memory for the library function. Bas- 
rum loads Basic programs above this, 
in unprotected memory. It stores sub- 
routines on one or more disk files. 
You can then load a file, or any part of 
it, into protected memory where it re- 
mains safe and accessible to any Basic 
program. 

An alternate approach is to append 
the necessary subroutines to the Basic 
program in memory, in which case 
they're unprotected and will be lost 
when you load the next program. Nor- 
mally, you would put frequently used 
subroutines, such as an INKEY rou- 
tine, in the library area, while you 
would more logically append a sub- 
routine that draws a car for a game to 
the appropriate Basic program. 

Using Basrum 

To create a Basrum routine, you 
simply put two asterisks at the begin- 



ning of the code and two at the end. 
You can assign names to the subrou- 
tines for easy recall. For example, 
**WAIT might indicate a routine that 
accepts pressing the enter key to con- 
tinue, and **INKEY might control 
program input. You can use Basic key 
words as subroutine names. 

You can include remark statements 
with the subroutines without wasting 
memory if you put them before the as- 
terisks. The comments aren't loaded 
when you call the subroutine, but they 
remind you what variables you used 
and what the subroutine actually does. 

To simplify the job of converting a 
program to or from Basrum subrou- 
tines, the program features a Find rou- 
tine. You can use this feature to in- 
voke a global search and replace for 
any GOSUB commands you're chang- 
ing to Basrum calls. 

This program has two search 
modes: a logical search that ignores 
spaces, and a literal search that re- 
quires a perfect match, including spac- 
es. The literal search is useful for find- 
ing a match within an ASCII string. 



You can incorporate a special 
search function in Basrum as a com- 
mand at the beginning of a Basic pro- 
gram. This function checks the pro- 
gram for any named subroutines that 
it needs, finds them in the file speci- 
fied, and loads them. 



Basrum 
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Wiley Inc. 
84) Bishop St. 
Honolulu, HI 96813 
Models I and III 
$149.50 
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Communications Gap? LETS TALK"! 



IBM PC &. 
PC XT* 



COMPAQ" 




TRS-80® Model III 
TRS-80 Model 2. 
4, 12 and 16 



Tandy 2000' 



LET'S TALK CLOSES THE COMMUNICATIONS GAP another. Precisely Easily. Without professional, expen- 



BETWEEN TODAYS POPULAR PERSONAL 
COMPUTERS. 

LET'S TALK is a complete package for fully supported 
communications between any of these computers. In 
any direction. Without additional expense. 
LETS TALK is a simple, straightforward pro- 
gram that transfers ASCII data files, including 
BASIC and VTsiCalc®, from one computer to 



sive data processing expertise. 
LET'S TALK allows two computers to communicate 
directly with each other in a "conversational mode" 
when not actually transferring data. And. LET'S TALK 
can send or retrieve files of any size from unattended 
computers, at three different speeds. 
GROWTH AND EXPANSION REQUIRE 
OPEN COMMUNICATION. LETS TALK. 



50FTUJPT Je conn 



Making dollars and sense out of information. 



TRS-80 is a registered trademark of Tandy Corporation Tandy 2000 is a trademark of Tandy Corporation Visi Calc is a registered trademark of VisiCorp. 
IBM PC and PC XT are registered trademarks of IBM Corporation COMPAQ is a trademark of Compaq Computer Corporation 

a division of the goodman group, inc 12900 Preston Rd . Dallas. Texas 75230 (214) 239-6085 
LET'S TALK includes all diskettes for each of the above computers Suggested retail price of $149 00 + $5 00 shipping 
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You can also use Basrum to chain 
or overlay programs. You can then ex- 
ecute programs in segments that are 
too large to fit in memory. Basrum 
passes variables and file buffers from 
the old program to the new one. It has 
a command that lets you specify the 
size of the various parts of the memo- 
ry, including how much space to 
reserve for program overlays. It's pos- 
sible to retain a resident program and 
overlay another program, or subrou- 
tines, in protected memory. 

Some compilers will work with Bas- 
rum, but not all. According to the 
manual, only compilers that compile a 
portion of the code should function. 
You can't use compilers, like Micro- 
soft's, that convert an entire program. 

The Documentation 

The manual is a bound SVi- by 11- 
inch paperback, attractively printed 
on heavy stock and easy to read. 
While the Basrum docs don't provide 
an index, the table of contents is very 
complete. Also, there is a glossary and 
a chapter listing error messages. Liber- 
al use of bold print and indenting of 
text, as well as cross referencing, makes 
finding the desired information excep- 
tionally easy. Help is also available on 
screen for any of the Basrum com- 
mands. 

People who do enough program- 
ming to want to spend $150 on Bas- 
rum are often involved with distribu- 
tion of their work, even if only by 
sharing with local clubs. It is unfortu- 
nate that there is no provision for dis- 
tribution rights to a Basrum runtime 
module so that its subroutines could 
be used in programs meant for sale or 
public domain. The manufacturer has 
recognized this need and states that 
they are currently working on a run- 
time module, which will be available 
to registered owners for a one-time fee 
of under $30. ■ 



Ghost Busting 

by Robert Mitchell 
80 Micro staff 

It is a dark and stormy night. You're 
traveling through a sleepy ghost 
town from the train depot, across 
town, to a haunted house. Suddenly, 



ghosts appear and try to scare you 
away. Without blinking an eye, you 
reach for your ghost blaster. As a 
ghost exterminator extraordinaire, 
this is all in a day's work. 

You are playing 13 Ghosts, a new 
Radio Shack game for the Model 4. 
Using the arrow keys, you move your 
ghost blaster (a blinking cursor) 
around the screen to shoot ghosts of 
varying sizes and point values as they 
emerge from the bottom of the screen. 

As you shoot the ghosts, you receive 
points that scroll you further down the 
deserted main street — past a general 
store, saloon, hotel, cemetery, and so 
on until you reach the haunted house. 
Then you begin the return trip. 

Each trip between the depot and the 
haunted house represents one level of 
play, but the difficulty level changes 
only every other trip. 

Game Play 

The game starts with four ghosts on 
the screen. All ghosts rematerialize at 
the screen bottom as soon as you 
shoot them. If some ghosts escape, 
other, more dangerous, ghosts (with 
higher point values) appear. Laughing 
ghosts have no point value, and call up 
more dangerous ghosts unless you 
shoot them. 

The game continues until 13 ghosts 
escape your blaster. A counter at the 
screen bottom keeps track for you. 
You do have some help in ghost-bust- 
ing. Spiders slide down the screen, 



13 Ghosts 

**** 



Tandy/Radio Shack 
One Tandy Center 
Fort Worth, TX 76102 
Catalog number 26-1927 
Model 4, 48K RAM 
One disk drive 
$19.95 



Good graphics? 
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Good docs? 
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Fast? 
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Challenging? 
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temporarily scaring away the ghosts. 
If you shoot a spider, your total ghost 
count decreases by one. 

If you complete a trip to the depot 
or the haunted house with the ghost 
counter on 12, you get a ghost-free trip 
back through town. The point value 
for this trip is worth twice the score 
you'd get if you played the trip. 

Shots take a moment before hitting 
a target, so you must shoot slightly 
ahead of the ghosts to score a hit. I 
thought cursor movement slow rela- 
tive to the ghosts flitting about the 
screen. For the uninitiated this gives 
the game the appeal of a slow-motion 
nightmare. 

One problem is the difficulty of 
distinguishing between the 12 types 
of ghosts. You're never really sure 
which ghosts provide the highest point 
values. 

Play is slow at first, but don't get a 
swelled head after completing your 
first level of difficulty. The game be- 
comes much harder the second time 
around. 

I found it difficult to advance past 
the third of the 32 difficulty levels. As 
the game progressed, I got lost in a 
swirl of ghosts that left my blaster far 
behind. To pass through the different 
levels, you have to rely on your ability 
to predict where the ghosts will appear 
and fly. 

Documentation and Sound 

Documentation is good. 13 Ghosts 
comes with an eight-page booklet that 
includes illustrations, advanced strate- 
gy instructions, and technical infor- 
mation. 

Game sound is low-key, a relief 
from the constant squawking of other 
games. It plays different tunes for the 
introduction, high scores, and bonus 
trips, as well as providing action sound 
effects. 

Conclusion 

Good sound and graphics, and the 
game's originality, make 13 Ghosts 
worth the price. Much detail is given 
to the background as you pass 
through the town, and new graphics 
are added with each difficulty level. 

While 13 Ghosts isn't as fast as 
some other arcade games, it's just as 
challenging. It's an honest -to-good - 
ness TRS-80 game — a rare thing these 
days — and a pretty good one at 
that.B 
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Learning to C 



by Dan Keen and Dave Dischert 



Although C may seem like an ar- 
cane high-level language, es- 
pecially to those of us who regard Ba- 
sic as the mother programming 
tongue, Robert J. Traister's Program- 
ming in Cfor the Microcomputer User 
does an excellent job of making the 
concepts of C clear to any program- 
ming novice. Traister has spent many 
painstaking hours presenting the ba- 
sics of C in an easy-to-leam manner. If 
you have no idea of what a C compiler 
or linker is, or what the language itself 
is all about, you should pick up this 
book. 

What Is C? 

C is as powerful a language as As- 
sembly language, yet you can develop 
machine-language programs more 
easily with it. C is a compact, efficient, 
fast, and transportable language that 
works on many machines, even if they 
use different microprocessors (assum- 
ing a compiler is available for your 
particular computer). 

With the exception of Basic, no oth- 
er language has yet to surface as the 
main force behind the development of 
system-level microcomputer software. 
C might just emerge as the victor. 



Programming in C 

for the 

Microcomputer User 

***• 

by Robert J. Traister 
Prentice-Hall Inc. 
Englewood Cliffs, NJ 07632 
190 pp. 

$16.95 
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Traister's Programming in C 

Some programming books on C 
make comparisons to Cobol, Fortran, 
and Pascal, but most readers are more 
familiar with Basic. Traister, to his 
credit, makes frequent comparisons to 
Basic. 

C is close to Basic in many respects. 
Each C routine has an equivalent Ba- 
sic counterpart. Even though Traister 
explains each C program line by line, 
he points out the similarities to Basic. 
As a result, Basic programmers will 
feel more secure learning this new lan- 
guage since they can visualize C in 
terms familiar to them. 

Every routine in the book is a com- 
plete, self-contained program ready to 
compile and run. The routines are 
short and excellent for teaching the 
fundamentals of this programming 
language. 

The author uses an IBM PC and of- 
ten makes reference to MS-DOS. This 
is especially beneficial to Tandy 2000 
owners since their machines use MS- 
DOS and can take advantage of the 
extra features MS-DOS offers, such as 



setting up batch files to handle all the 
compiling and linking processes. 

In addition to the basics, Traister 
discusses the Supersoft C compiler, in- 
put control programs, handling char- 
acter strings, and advanced program- 
ming in C. The appendix gives detailed 
use of the standard C library func- 
tions. 

Of course, the main thrust of the 
book is to teach the fundamentals of C 
and get the reader's feet wet. We sug 
gest that the reader have at least a little 
experience with Basic, since the author 
makes the assumption that you under 
stand the idea of using letter variables 
to represent numerical values, as well 
as the symbols for math ( + , -,*,/, 
<♦>, = ). 

Drawback 

The book's only shortcoming is that 
it doesn't go very deep. While it's a 
good book, it's designed for beginners 
prior to tackling a more complex ref 
erence. To do any complex program 
ming, you'd have to buy a more ad 
vanced programming manual. ■ 



BRICKWARE 

If you invest in brick and mortar, then you should invest 

in our brickware, Investor III \ Designed by real 

estate professionals to work on the IBM PC or TRS-80, 

Investor III™ is a comprehensive software package that 

aids in investment analysis of property, whether 

commercial or residential, small or large. It shows 

both the tax and cash aspects of an investment opportunity 

| and is flexible enough to allow you to vary a number 

of key assumptions (such as cash flow, phased investments. 

multiple mortgages, and tax parameters) and see the 

results in an instant. So if you are serious about brick 

and mortar, look at our brickware. It will help you lay a 

solid foundation for your investment strategy 

Contact your local dealer. 
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Big Teal 

The Teal 418 daisy-wheel 
printer ($545) from Teal 
Industries Inc. (1741 Lomi- 
ta Blvd., Lomita, CA 
90717, 213-539-7244) runs 
at 18 cps and uses a 
96-character daisy wheel 
with 10, 12, and 15 pitch. 

The 418 features super- 
and subscripting, auto un- 
derlining, proportional spac- 
ing, shadow print, and bold 
print. It uses a cartridge rib- 
bon and generates less than 
a 60 dB noise level during 
operation. 

Its friction feeder uses 
13-inch paper and prints up 
to four carbon copies. The 
printer comes with a paral- 
lel or RS-232 interface. A 
forms tractor and a sheet 
feeder are optional. 

Reader Service s 565 



TKISolver for 
the TRS-80 

TK! Solver, an equation- 
solving mathematical anal- 
ysis program from Soft- 
ware Arts, is available for 
the Model 4. The program 
accepts equations and 
known values, then solves 
for the unknown variables. 

You can also enter prop- 
erties and characteristics of 
variables, conversion def- 
initions for units of mea- 
sure, and other equation 
factors. 

TK! Solver solves prob- 
lems requiring repeated 
calculations. When the 
program cannot solve an 
equation using the direct 
method, it uses successive 
approximations to find the 
answer. 




The Teal 418 printer features an 18 character-per-second print speed. 



You can specify values 
and associate them with 
variables in a model, change 
conversion definitions, and 
print charts and graphs of 
program results. 

TK! Solver contains 34 
mathematical functions, in- 
cluding trigonometric, log- 
arithm, and square root to 
reverse hyperbolic tangent 
and logarithm base- 10 func- 
tions, and has an online 
help file and error checking. 

The program requires 
128K RAM, and is available 
for $299.95 at Radio Shack 
stores. For more informa- 
tion contact Tandy Cor- 
poration/Radio Shack, 
1800 One Tandy Center, 
Fort Worth, TX 76102. 
Reader Service ** 552 



Playing With the Pros 

Chess Classics from 
Noteworthy Software Con- 
sulting Co. (12 Noteworth 
Drive, Danbury, CT 06810, 
203-743-2039) improves 



your chess game by letting 
you replay the matches of 
the world's best players. 

You choose from 64 of 
the best games in the last 
200 years, such as Fischer vs 
Spassky and Karpov vs 
Torre. You play on the win- 
ning side. The object is to 
figure out the moves that 
your "partner" made to 
win the game. Chess Clas- 
sics corrects you after one, 
two, or three wrong moves. 

After you complete a 
game, Chess Classics rates 
the match played according 
to the United States Chess 
Federation. 

Chess Classics runs on 
the Models I, III, and 4. It's 
$59.95 for the King Pawn 
Games disk or the Queen 
Pawn Games disk. Both 
disks are $100. 

Reader Service *^ 551 



Cost-Plus 
Considerations 

A customer calls and 
wants a quote for building 



aluminum widgets. Not 
one to make haphazard 
guesses, you use Esta-Mate 
and generate a fast, accu- 
rate quote. 

Esta-Mate ($179) esti- 
mates your manufactur- 
ing job costs and generates 
reports and a ready-to- 
mail job quote for the cus- 
tomer. 

The program works for 
any manufacturing job 
that consumes raw materi- 
als by weight. Esta-Mate 
inputs the name and ad- 
dress of the company re- 
questing the quote and 
your markup percentage. 

It then collects cost in- 
formation for labor, raw 
material, vended services, 
outside purchases, and 
tooling, and generates a de- 
tailed summary and a cus- 
tomer quote. 

Esta-Mate runs on the 
Models III and 4 with 48K 
RAM and one disk drive 
and is available from Comp 
Plus Systems Inc., P.O. 
Box 72054, Roselle, IL 
60172, 312-894-2444. 
Reader Service ^ 553 

Nuke ware 

It's 8:15 on a Monday 
morning, a day like any oth- 
er at the plant. Suddenly 
red lights flash on the con- 
trol panels around you — 
something's wrong with the 
reactor and you'd better 
find out what it is fast. 

You're playing Melt- 
down, a Models I, III, and 4 
real-time simulation game 
by Stewart F. Hunter that 
puts you in charge of a nu- 
clear power generating sta- 
tion. 
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Speak. 
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And Listen. 
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Your computer can do both. Speech Systems for Your Microcomputer is an 
introduction to voice input/output that shows you how. 



What Voice I/O Is 

Speech Systems for Your Microcom- 
puter has information on all the latest 
voice technology, for business, 
home, educational, or industrial use. 
You'll find out what speech systems 
are all about— getting your computer 
to produce synthesized speech and to 
recognize human speech. You'll 
learn how you can use voice I/O, in 
teaching programs, helping the hand- 
icapped use computers, talking home 
appliances, factory and test equip- 
ment, and more. 



Jo order 

Speech Systems for Your Microcomputer is 
available for $14.95. You can call toll-free for 
credit card orders, 1-800-258-5473. Or you 
can mail your order with check, money 
order, or complete credit card information to: 
Wayne Green Books, Retail Sales, Peter- 
borough, NH 03458 Include $1.50 for the 
first book, $ 1 .00 for each additional book for 
postage and handling. Orders are payable in 
U.S. dollars only. Allow four to six weeks for 
delivery. WGBooks are available at your 
local bookstore Dealer inquiries invited. 



The Latest Speech Products 

A complete buyer's guide shows 
you what's available, from twelve- 
dollar products to systems that cost 
thousands. You can use it to deter- 
mine which products are best suited 
to your needs and budget. Current 
prices and addresses are given, so 
you can shop around without wast- 
ing time or money. Speech Systems 
for Your Microcomputer also contains 
over 100 pages of reprinted 
manufacturers' data sheets. 



How To Do It 

Speech Systems for Your Micro- 
computer 
shows you 
voice systems 
in action. For 
speech syn- 
thesis and 
recognition, 
you'll follow 
the construc- 
tion of pro- 
jects, using 
some of the products described in 
the book. 




Speech Systems 
for Your 
Microcomputer 

Gaiy A. Shade 

BK7406 

ISBN 0-88006-073-5 

8% by 11 

soft cover, spiral 

bound 

254 pp. 



S 66 



■tS, Send me copies of Speech Systems for Your 

Microcomputer (BK7406) at $14.95 each, plus $1.50 for the first 
book, $1.00 for each additional book for shipping and handling. 
□ payment enclosed D MasterCard C Visa D Am. Ex. 



Card* 


Expiration date 


Nainc 


Signature 


Address 



City 



State 



Zip 



Wayne Green Books, Peterborough, NH 03458 
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You can display a plant 
diagram or switch to a con- 
trol panel display while the 
plant operates. The object 
is to keep the plant at peak 
performance by properly 
resolving any problems 
that arise. 

Meltdown is a comment- 
ed Basic program pub- 
lished by Micro Mining 
and Assay Co., and is 
available from DiskCount 
Data (2701 -C West 15th 
St., Piano, TX 75075, 214- 
680-8268) for $19.95. 

Reader Service *s 555 

Computer Lessons 

OK, so you've got a com- 
puter; now what do you do 
with it? TRS-80 Models HI 
and 4 Programming and 
Applications ($15.95) by 
Larry Joel Goldstein gives 
you the lowdown on the 
programming capabilities 



TRS-80 
Models HM 

PROGRAMMING AND APPLICATIONS 




TRS-80 Models III and 4 Programming and Applications introduces new 
users to computing. 



and applications for the 
Models III and 4. 

Written for the beginner, 
this 305-page paperback in- 
cludes an introduction to 
TRSDOS, Model III and 
Disk Basic, and applica- 
tions for business, graphics, 
games, simulations, and 
word processing. 

Also included are exercis- 
es and questions to test un- 
derstanding, and applica- 
tions programs for every- 
day tasks. 

Contact Robert J. Brady 
Co., Bowie, MD 20715, 
301-262-6300 for more in- 
formation. 

Reader Service ^ 554 

No Small Matter 

Managing payroll for 
even the smallest compa- 
ny can be a big task. The 
Tinypay payroll system 
from The Alternate Source 



NEW And IMPROVED 

CP/M-68K 

Treat your TRS-80 Model- 16 or Enhanced Model-ll or -12 to our new 
Version 1.2 CP/M-68K, now with: 

• Keyboard "iy pea head • Overlay loader 

• C compiler with standard • New utilities 
and IEEE floating point • 68000 assembler 

Option languages* — CBASIC-68K, PASCAL MT+, FORTRAN-77, 
FASCAL-68K, BASIC-68K 

Version \.\ users; order a language and receive your version 1.2 up- 
grade FREE. Upgrade alone only $25. 



Trisoft 

4102 Avenue G 
Austin, Texas 78751 
(512)453-2233 




•Requires 256 kbytes minimum except for BASIC-68K 
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Selling 80 Mi- 

W k.^ ^^ cro wi " make m on- 

^^^^ ^k^| ^^^ ey for you. Consider the 

^r^^^m Fact #1: Selling SO M/cro in- 

^^^^^r creases store traffic — our dealers 

m^^r tell us that SO M/cro is the hottest- 

j^^^ selling computer magazine on the news- 

stands. 
Fact #2: There is a direct correlation between 
store traffic and sales — increase the number of people 
coming through your door and you'll increase sales. 
Fact #3: Fact #1 + Fact #2 = INCREASED $ALE$, 
which means more money for you. And that's a fact. 

For information on selling 80 Micro, call 800-343-0728 
and speak with our direct sales manager. Or write to 
80 Micro, 80 Pine St., Peterborough, NH 03458. 



micro 



80 Pine Street Peterborough. NH 03458 

800-3430728 




micro 



the mjga/me ft* TRS-$0' use's 



Reader 
Service 



10 RECEIVE MORE INFORMATION ON THE PRODUCTS AND 
SERVICES ADVERTISED IN THIS ISSUE, PLEASE TURN TO 

READER SERVICE CARD. 



CONTROL YOUR 

COSTS AND 

MAXIMIZE 

YOUR PROFIT 



To make a profit, you have to know what 
your costs are. Low Cost Costing is a book- 
and-software combination that will help you 
determine production costs for your small 
business, using your Apple, IBM PC, or TRS-80. 
If you are responsible for production, you can 
increase your profits once you know what 
you're spending. Low Cost Costing shows you 
how to analyze your costs using your profit-and- 
loss statements and your microcomputer. Once 
you've found them, you can: 

• Cut your costs. 

• Adjust prices. 

• Set marketing and manu - 
facturing strategies. 

• Determine why 
some products sell and 
others don't. 

It's the time- and money-saving combination 
your small business needs— Low Cost Costing and 
your micro. 



LOW 

COST 

COSTING 

ntoovcrcoantiG 

m / II I'll ft 
.WiCJKXVMfl'tTlK 

'maws s. rtsu 



/ 



Low Cost Costing 
Thomas S. Fiske 
approx. 1 12 pp. 
$24.97 

TRS-80 Model I, III 

CC7403 [package) 

ISBN 0-88006-072-7 



Apple II, II Plus, He 

CC7399 (package! 

ISBN 0-88006-067-0 

IBM PC 

CC74Q2 [package! 

ISBN 0-88006-071-9 



To order, call toll-frer 1-800-258 5473 for credit card orders Or mail your order with 
i heck or money order or complete credit card information to Wayne Green Books, 
Retail Sales. Peterborough. NH 03458 Please include shipping and handling of $1 50 for 
the first system. $1 00 for each additional system. Orders payable in US dollars only 
Please allow 4-6 weeks for delivery . 



f GSm I want Low Cost Costing. $24.97 per system, plus ship- 
ping and handling ($1.50 for the first system, $1.00 for each addi- 
tional system). Please indicate total number wanted for each 
system. 

_ Apple (CC7399) _IBM PC [CC7402) _ TRS-80 (CC7403) 

[ 1 payment enclosed 1 1 MasterCard D Visa □ Am. Ex. 

Card* MCbank# 



Expiration date 

Name 

Address 

Citv 



Signature 



State 



Zip 



L. 



See List of Advertisers on Page 176 
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(704 N. Pennsylvania Ave., 
Lansing, MI 48906, 517- 
482-8270) handles payroll 
for up to 20 employees. 

This Basic program pro- 
duces payroll reports and 
maintains totals for each 
accounting period. You 
can add or subtract em- 
ployees, change employee 
data, or process a payroll 
period. 

Documentation includes 
instructions for modifying 
the program. Tinypay is 
available for the Models I, 
III, 4, and 2000 for $20. 

Reader Service s 557 

Modem Deluxe 

The ProModem 1200 
from Prometheus Products 
Inc. (45227 Fremont Blvd., 
Fremont, CA 94538, 415- 
490-2370) is a 300-/1,200- 
baud, auto-dial, auto-an- 
swer modem with a built-in 




The ProModem 1200 has an optional 12-characier display (o keep you in- 
formed of modem operations. 



clock, calendar, and many 
options. 

It features programma- 
ble dialing, tone or pulse 
dialing, and a speaker with 
volume control for $495. 
ProModem 1200 stores 
telephone numbers, access 
codes, and log-on messages 
in a directory, and uses up 



to 12 characters to call up 
entries and initiate automat- 
ic dialing. 

The modem buffer stores 
messages for automatic 
transmission at a specified 
time to any phone number 
in its directory. In auto- 
answer mode, ProModem 
1200 automatically stores 



incoming messages and the 
time it records them. The 
modem can run with the 
host computer turned off. 

An optional 2K CMOS 
buffer card ($99) uses a bat- 
tery back-up to protect 
time, date, and other data 
in RAM. Up to 64K of ad- 
ditional memory is available 
in increments of 16K. 

A 12-character display 
($99) gives operating sta- 
tus, diagnostics messages, 
phone numbers, and the 
time and date. 

Reader Service ** 558 

Drive 
Decontamination 

Automation Facilities 
Corp. offers two disk-drive 
cleaning systems for your 
computer. 

Floppiclene is a wet /dry 
disk drive head cleaning sys- 
tem that safely and quickly 



LOGICAL SYSTEMS CATALOG 

W'Mfe' THSDOS s a 



* TBA is a text pre-processor that 
translates structured BASIC source 
into interpreter executable programs 
Supports long variable names and 
named references/procedures, along 
with conditional translation S79. 

* BSORT/MOD324 is an advanced 
mach.ne langjage sort tor M4 BASIC 
Multiple key/tag arrays 1 or 2 dimen- 
sion, string or numeric arrays 
MOD324 does most of the restructur- 
ing to allow M3 BASIC programs to be 
run under M4 BASIC $49. 

* DiskDISK a4lows the partitioning of 
large volume drives into smaller logical 
volumes which look" just like addi- 
tional floppy drives This should be con- 
sidered a must for hard disk or other 

large drive users $99. 

' FED II is an all-purpose File/Disk 
editor for LDOS or TRSDOS 6 Bytes 
may be modified in either ASCII or 
HEX Location may be done via search 
string, load address or record number 
Shows disassembly of /CMD files $49. 

' File Manager will handle ail those 

COPY. MOVE. PURGE or BACKUP 
jobs with ease Faster and more ver- 
satile than BACKUP or PURGE. FM 
can also produce a script" for later ex- 
ecution through JCL $49. 



The LSI HELP System is a complete 
series of packages to provide on-line 
help information to LDOS/TRSDOS 6 
users Packages are available for 
DOS/BASIC help, Technical help, and 
the development of additional "HELP" 
information files Prices start at $29. 

7.' • LS-HOST/TERM is a complete Mod 
4 communications system Includes 
ADDS25 terminal emulator XMODEM 
file transfer utility for error-free transfer. 
HOST program with password protec- 
tion and much much more Ideal for 
use with XENIX S199. 

8. ' LED is the LSI full-screen text EDitor 
Uses all LDOS special features (KSM. 
tilters/drivers ) Excellent for editing 
KSM and JCL source f les T6 version 
includes block write to disk" and "in- 
sert file at cursor" $49. 

9." LS-QFB/Comp consists of two 
utilities. QFB performs a "fast* mirror- 
image backup of a disk formatting the 
destination disk >n the process Comp 
will compare any two disks o r files, with 
differences to display or printer $49. 

10." * The LS-Utility Disk is a collection of 
the most popular LSI filters and utilities 
re-written for use under TRSDOS 6 on 
the Mod 4 Includes KSMPLUS, MAX- 
LATE. CALC. READ40 and much 
much more $49. 



eg'Sier 
ea trademark °' |n * 

Tandy Coipo'dt'On 

LDOS is a registered 

'.ijciid'k ol Logical 
stems Inc 




' ' Mvailable for TRSDOS 6 only 
* Versions available for LDOS 5.1 and TRSDOS 6 (Specify when ordering). 



Now pay only S69 for the power of the LDOS 
operating system, or just S39 for the smal- 
LDOS subset Specify Model 1 or 3 when 
ordering 

TOLL FREE ORDERLINE 
(800) 248-3535 

Shipping and Handling NOT INCLUDED 

JOGICAL 
SYSTEMS 8970 North 55th Street 
/C P.O. Box 23956 

0O-£>= Milwaukee, Wl 53223 

Hnces ar-d specifications subject to change without notice 
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eliminates contaminants in 
your disk system. 

To prevent recontamina- 
tion, Floppiclene uses dis- 
posable cleaning disks. The 
Floppiclene Home Com- 
puter System (for 5!4-inch 
disk systems) includes Safe- 
clene aerosol cleaning solu- 
tion, cleaning disk jacket, 
and 10 disposable disk in- 
serts for $19.95. 

The Floppiclene System, 
for 3'/2-, 5!/4-, and 8-inch 
disk drives, includes 20 
cleaning disk inserts, disk 
jacket, Safebond absorbant 
wipes, and two Safeclens 
anti-static screen wipes for 
$34.95. 

Refill kits with 20 clean- 
ing disks and Safeclene 
aerosol are $14.95. For 
more information contact 
Intratec at 175 S. 3rd St., 
Suite 1020, Columbus, OH 
43215, 614461-4618 
Reader Service ^ 560 




Compugreet computerized greeting cards come on fan-fold paper for 
continuous tractor-feed printing. 



Season's Beepings 

You want to send every- 
one a Christmas greeting, 
but you don't have the time 
to write and send out all 
those cards. With Compu- 
greet 's new LX series greet- 
ing cards, you can use your 
word processor and printer 



to quickly get cards to 
everyone. 

The cards have perforat- 
ed tractor-feed holes, with 
one side of the paper sport- 
ing a greeting and the other 
side reserved for your per- 
sonal greeting. 

Eight designs are avail- 
able for Christmas, birth- 



day, and all-occasion uses. 
A box of 20 cards and en- 
velopes is $9.95. Boxes of 
100 are $45, and boxes of 
300 are $130. 

For more information 
contact Compugreet at P.O. 
Box 3357, Reston, VA 
22090. 

Reader Service ^ 559 



Keene Programs 

Keene Computing Ser- 
vices Co. (P.O. Box 13044, 
College Station, TX 77841, 
409-846-4426) has three 
utilities for the Models 1, 
III, and 4. 

XIBM ($35) copies files 
between MS/DOS or PC/ 
DOS 1.0 disks and your 
TRSDOS, DOSPLUS, 
NEWDOS80, and LDOS 
system disks. This menu- 
driven utility includes an 
on-line help file. 



Graphics Solutions 

High-Resolution Software and Hardware 



Radio Shock Model 4/4P/UI hires 
board owners: GBflSIC 3.0. This enhanced 
version of Graphics Basic provides on 
equivalent for ail of the Radio Shack 
commands as well as adding a number of 
important new ones. The hi- res screen con 
be printed on any of 20 popular printers 
or saved or loaded to dish without leaving 
Bask. The software works with TRSDOS, 
LDOS, NCUJDOS80, and DOSPLUS and 
uses 1400 bytes less memory. The disk 
comes with over 40 graphics related 
programs and a detailed manual which 
includes entry addresses for interfacing to 
assembly language. GBRSIC 3.0 is 
required in order to run any of the 
following programs. $49.95. 

The following eight programs run on a 
Model 4/4P/III equipped with a Micro- 
labs or Radio Shock graphics board: 

DRRUJ - R sophisticated full screen graphics 
drawing and editing program. $39.95. 

6IZGMPH - Create business graphs from 
hand-entered or Visicalc data. $98.00. 

ICT'S WMTC muSIC - fin editor which lets 
you display and print music. $49.95. 



3D-PLOT - View three-dimensional data 
from ony perspective or angle. $39.95. 

mflTHPlOT - Plot equations of the form 
V-F(X) with auto scaling. $39.95. 

SURfACC PLOT - Plot three-dimensional 
equations of the form Z=F(X,V). $39.95 

BIOftHVTHm 6 USA - Chart your biorhythm 
or learn the states and capitals. $24.00 

GRAFYX SOLUTIOfl. Plug-in, dip-on 
board enhances any Model 4/111 to provide 
640 x 240 / 512 x 192 dot graphics. 
Comes with over 40 programs/files 
including Graphics Basic 3.0 which odds 
over 20 new commands. $199.95. 

80-GRAFIX. Plug-in, clip-on board 
upgrades any Model lll/l to provide 128 
user-definable characters. Comes with 
over 20 programs/files. $99.95. 

JOV-mOUSC. Allows a Radio Shock 
Color Computer joystick and mouse to be 
connected to any Model 4/4P/HI. Hard- 
ware provides X, V position values from 
to 255. R built-in speaker produces 
sound from the cassette port. $99.95. 




G.l.fl.fl. Software program for the Model 
4/4P/III/I which uses the standard block 
graphics screen to display a window to o 
larger 65536 x 65536 dot tablet. The 
arrow keys are used to draw two or 
three-dimensional figures. The display can 
be scaled, shifted, or rotated in ony 
dimension. The final picture is printed in 
hi-res on Radio Shock, Cpson, N€C 8023, 
or Prowritcr printers. $98.00. 

Please specify your exact system 
configuration when ordering or requesting 
information. Payment may be by check, 
COD, or Visa/MC. Domestic shipping is 
free on pre-paid or COD orders. (Texas 
residents odd 5% sales tax.) ^ 4g4 

Micro-Labs. Inc. 214-235-0915 

902 Pinecrest. Richardson. Texas 75080 



* See List of Advertisers on Page 176 
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Why E-C DATA claims to 
manufacture the best TRS- 
Kits in the World... 

We know how. As Tandy importers to Denmark, we have wor- 
ked with TRS-80s for over four years, developing national key- 
boards and character sets, disk kits and DOS'es. The Scandi- 
navian Model 3s came with 80 track drives and 80 track TRS 
DOS right from the beginning. Even Model I was supplied with 
77 track disk systems - manufactured by E-C DATA. 

We get product information early and precisely as Authorised 
Tandy Dealers. 

We use One-Year-Old Technology. Old enough to be reliable 
but not obsolete - that's -One-Year-Old Technology- WD- 
2793 Controller Chip, 8k CMOS RAM in Flat-Pack versions. 
State-of-the-Art ? Certainly ! And reliable. 
We purchase no odd lots of components to make a Fast Buck 
We buy on long-term contracts from leading manufacturers 
such as Texas Instruments. Western Digital, Shugart and Hita- 
chi, assuring a steady and constantly high product quality 

We burn in and test everything, before it is shipped - under 
realistic operating conditions in TRS-80 Computers 

We help you by providing detailed installation and repair ma- 
nuals If you get stuck anyway, chances are that you get to talk 
with the Graduate Engineer who actually designed your kit, if 
you phone us for help ' 



FREE SHIPPING 
WORLD WIDE ! 

12 MONTHS GUARANTEE ! 



FOR MODEL 3 AND 4: 

Complete Disk Kit w/ 64k M4 RAM w/o Drives* 265 

Complete Disk Kit w/ 32k M3 RAM w/o Drives' 250 

Complete Disk Kit M3/4 w/o RAM w/o Drives* 215 

Floppy Disk Controller (3' 2, 5V5», 8") M3/4 155 

Real-Time Clock/Calendar Option, Add 60 

8 Drive Option, Add 10 

Disk Installation Hardware w/Power Supply w/o Controller ... 95 

2 to 4 Internal Drives Expansion Power Supply 65 

RS-232 (V. 24) Communication Interface Kit M3/4 75 

First 64k M4 RAM Expansion Kit 65 

64k - 128k M4 RAM Expansion Kit w/ PAL U72 70 

M4 PAL U72 alone 30 

TRSDOS 6 2 for M4** 45 

Disk Drive Shugart SA-455 Vt Hight, DS, 40 Tracks 205 

Disk Drive Shugart SA-465 '2 Hight, DS. 80 Tracks 245 

FOR MODEL 100: 

8k Internal RAM Expansion, Low Power CMOS 80 

32k Battery Backed Plug-in Extra RAM Bank (32-64k) 325 

Bell 103 to CCITT Internal Modem Conversion Kit 65 

' Speedy whether you intend to use the Kit with Full or Hall Hight Drives ' 

' 'Only with Purchase of Disk Kit Specify 40 or 80 Track Diskette ' 

TRS-80 ana TRSDOS are Trade Marks ol TanOy Corporation Fort Worth Texas 

ORDERING: 

USA (New York): 1 - 212 - 678 0064 
Denmark: 45 - 2 - 818191. Tlx 37825 ec dk 

Use whichever Is convenient in your time zone - or write us ! 

All Products except Disk Drives and DOS Made in Denmark 

Dealer Inquiries Welcome ! 



El jAj SC$ 



i 



Payment by Cheque, Money Order or Credit Card. We ship to 
all Countries, where Hi-Tech Sales are Legal by US Law. 
All Prices in US Currency. Local Duty or Taxes not Included. 

E-C DATA A/S * IE-CI 

P.O.B. 116 - DK-3460 Birkered - Denmark 




The Falcon disk file protects disks in eight clear plastic compartments. 



The program has func- 
tions for calling disk direc- 
tories and for listing and 
copying files. It requires 
one disk drive. 

The X68K machine-lan- 
guage absolute cross as- 
sembler for the MC68000 
microprocessor ($59) lets 
you develop MC68000 pro- 
grams and download the 
object code to any MC- 
68000 system with an 
RS-232 port. 

The program supports 
the Motorola primary in- 
struction set and address- 
ing modes, has unlimited 
source and symbol file size, 
and has a separate system 
symbol file. 

X68K includes a file 
numbering utility, system 
symbol file manager, and 
a test source file that lists 
the instruction set. Pro- 
gram updates are available 
for $5. 

The utility runs under 
TRSDOS, NEWDOS80, 
MULTIDOS, DOSPLUS, 
LDOS, and LS-DOS/TRS- 
DOS 6.0. 

XU ($45) is a package of 
14 utilities that run on the 



Models I, III, 4, and 4P. 
Utilities include a line edi- 
tor/printer, read/write head 
cleaner, a string search pro- 
gram, a file linker, and a 
program to display file mask 
expansion. 

Keene Computing period- 
ically adds utilities to XU 
and sends updates to XU 
owners. XU runs on the 
Models I, III, 4, and 4P un- 
der LDOS, NEWDOS80, 
MULTIDOS, DOSPLUS, 
and TRSDOS 1.3 and 6.1. 

XIBM, X68K, and XU 
run on the Model I under 
LDOS only. 

Reader Service ^ 556 

Disks Exposed 

The Falcon disk file's 
unique design lets you store 
your disks and see them 
without taking them out of 
the file. It organizes and 
protects 5 V* -inch disks in 
eight separate compart- 
ments. Disks are enclosed 
in clear plastic, flip-back 
compartments for easy ac- 
cess. 

The file stores disks up- 
right and supports them to 
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Power surges can hit your system through phone lines as well as power 
supplies. The Kleen line security system protects you from both. 



prevent warping and bend- 
ing. It also keeps out dirt 
and dust contaminants. 
File capacity is 56 disks, 
seven disks per compart- 
ment. 

The disk file is $24.95 
from Falcon Safety Prod- 
ucts Inc., Dept. V, 1065 
Bristol Road, Mountain- 
side, NJ 07092, 201-233- 
5000. 

Reader Service »* 563 



Hard-Driving 
Software 

Two optimized hard disk 
drivers from Powersoft 
(11500 Stemmons Freeway, 
Suite 125, Dallas, TX 
75229, 214-484-2976) offer 
Model 1/III/4/4P owners 
with hard drives greater 
flexibility than standard 
drivers. 

The Series R/S driver 
(S99) for Radio Shack hard 
drives runs with the Model 
I/HI under LDOS or with 
the Model 4/4P under 
TRSDOS 6.0. These driv- 
ers offer full partitioning 
flexibility by the head off- 
set or cylinder offset meth- 
od, and can address the 
maximum logical drive size 
of 13 megabytes in one par- 
tition. 

The Install feature for- 
mats, verifies, and sets up 
the drive to your specifica- 
tions, then produces a con- 



figuration that the driver 
SYSGENs permanently. 

The R/S driver boots off 
the hard drive on the Mod- 
el 4P— you don't need a 
floppy disk. 

The WD Series I driver 
($99) for non-Radio Shack 
drives supports 5-20 mega- 
byte drives on the Models 
I, III, and 4. WD Series I 
works on drives from BT 
Enterprises, Percom, MTI, 
Compukit, Micro-Design, 
Level 4, Prometheus, and 
any drive using a Western 
Digital controller board. 

Both drivers let you 
share your hard drive be- 
tween LDOS 5.1 and TRS- 
DOS 6.0. 
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The Phoneman 
Always Rings Twice 

When lightning strikes 
you need to protect more 
than your computer's pow- 
er supply; your modem's 
phone line connections can 
wreak havoc on your 
system. 

The Kleen Line security 
system uses metal oxide 
varistor and gas discharge 
tube technology to sup- 
press telephone and power 
line surges caused by light- 
ning, spherics, or phone of- 
fice switching equipment. 

Models are available for 
4-pin modular connectors 



TRS-80 



WILL YOU PAY TOO MUCH? 

CAN YOU BUY DIRECT? 



Ask About Our 

"30 DAYS 

Buy- Back- Policy" 



WARRANTY: 

the RADIO SHACK warranty 
accompanies all R. S. 
merchandise sold by us. 




MODEL 2000. 768K 2 DR. 

(10 MEG. HARD DRIVE - BUILT IN) 




& 



v: 



& TRADE MARK 
OF RADIO SHACK 



SAVE SALES TAX* 
PLUS DISCOUNT 

•TEXAS RESIDENTS ADD ONLV 4 



FORT WORTH COMPUTERS 



WE ARE SERIOUS ABOUT SAVING YOU MONEY 



(Located 30 miles from Fort Worth) 
377 Plaza • GRANBURY • NR FORT WORTH. TEXAS 76048 

TOLL FREE: 1-800-433-S-A-V-E 

Monday thru Friday — 9:00 a.m. to 5:00 p.m. Texas Time 
(Order Inquiries/Customer Service &)IN TEXAS:817-573-41U 
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($65.95) and 8-pin connec- 
tors ($130.95). Both mod- 
els include a 6, 500- amp 
suppressor to protect your 
modem's power line. 

For more information 
contact Electronic Special- 
ists Inc., 171 S. Main St., 
Natick, MA 01760, 617- 
655-1532. 

Reader Service *s 569 

The Gang's AH Here 

Gangbox ($49.95) ex- 
pands your RS-232 serial 
port to accept three periph- 
erals, and lets you switch 
back and forth between 
your modem, printer, plot- 
ter, or other devices. 

You provide standard 
male-to-female extension 
cable: Gangbox does the 
rest. Plug your peripherals 
into the A, B, and C con- 
nectors and run your pe- 
ripherals by turning the 




Gangbox expands your RS-232 port to accept three peripherals. 



switch to the proper set- 
ting. 

Gangbox comes in a 
sealed, die cast aluminum 
case and includes a one 
year warranty on parts and 
labor. For more informa- 
tion contact E-Systems, 
Berkeley, 2308 Fourth St., 



Berkeley, CA 94710, 415- 
486-0686. 

Reader Service • 571 

Model 16 Pascal 
Compiler 

Oregon Software's Pas- 
cal-2 high-performance 



compiler for the Model 16 
TRS-Xenix multiuser devel- 
opment system ($699) pro- 
vides more readable Pascal 
syntax and improved error 
diagnostics. 

The Pascal-2 compiler 
produces faster, more com- 
pact code than C, and trans- 
lates existing Pascal appli- 
cations to TRS-Xenix from 
other operating systems. 

Pascal-2 programs can 
call C or Assembly-lan- 
guage subroutines to run 
existing TRS-Xenix soft- 
ware, and you can move 
Pascal-2 programs to other 
operating systems that use 
standard Pascal compilers. 

The compiler features 
nine types of code optimi- 
zations and type-compati- 
bility checks during compi- 
lation. Run-time checking 
detects array index, input/ 
output, arithmetic, and oth- 
er errors. 



FREE SHIPPING 

- DISEETTES ' 

West Coast'Call" Central & East 'Call*' 

1(800) 621-6221 1(800) 654-4058 

Discounts Starting at 3. Box Quantities 



QDysan 
•tf- 

s-side 



maxell 

3^i CALL 




— 9H 

dciooa....1395 

DC300A...184P 
DC30QXL2025 
DC600A..244S 



d-side 3£$ 
d-den. •J i t 



Diskettes 

10/Box 



— AMARAY media mate 4 

(3fe". .1196) (5W.II 95 ) 

DISK MINDERS 
(5V4 . .1675) (8". 2150) 

1 BULK PACKED DISKS CALL 



Verbatim 
sVDatalife 

s-side 10^5 
d-den. XO 

o-sioe 0A 3? 
d-den. L*l 
s-sidoOA95 

quad J V 
d-side0Q$5 

quad ?Jv 

• gDatalife 

s-side 
s-den. 

s-side 0£9j5 

d-den. Z0 

d-side 0195 

d-den. 01 



24 5 



Head Cleaners 

Kits 520 

Refills... 955 

Analizers 2500 



P 



Di$ette4 



Dealer Inquiries 
Welcomed 

1(800) 654-40581 



Delivery Only Add-on orders under 35* or 20 diskj 



WE IB 

MODEL III 



MODEL 4 




Stale or the ai technology ,n boa'd design our direc rpp a-p—e-' V Radio Shack s' 
internal RS 233 board mounts ms.de the Model HI of 4 pi ">» e.stng brackets All 
cables, screws and complete mounting instructions are nc -Jed Non-techn<ai 
people will find that installation is Quick, straight forward and simple requiring less 
than 1 5 minutes to complete 

Tolai compatabriity with Radio Shack" and an ensling software >s maintained 
Software programmable h»ud 'ates irom so to 1 9.200 baud aie supported along with 
programmable word length stop bits, and parity May be utiined Hi either halt of »uii 
dupie. operation Otit.l.ndJn* VMM 

«69. 95 



Only 



QfgKJBF 



Meed On 



: „ Ye 



»'4/l>0-l JJl 



Dearer ngv '*i -nied 
Pleaae forward payment by a cashier's 
check o* money ordar. 
Visa oc Mastercharge also accepted 

Add S3 0C shipping & handling 
(Foreign orders quoted on request) 
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Pascal-2 includes a 
user's manual and intro- 
ductory textbook for the 
Pascal programmer, and is 
available at Radio Shack 
stores. Contact Oregon 
Software Inc. (2340 S. W. 
Canyon Road, Portland, 
OR 97201) for more infor- 
mation. 

Reader Service • 566 

Watt's Up 

By simply walking across 
the office rug, you build up 
static electricity in your 
body that will zap your 
computer as soon as you 
touch the keyboard. 

Static Strip ($14.95) 
eliminates static buildup 
problems by constantly dis- 
sipating static electricity as 
you use your computer. 
Static Strip mounts on your 
computer's space bar and a 
small grounding wire con- 




Give yourseff an honorable discharge by using Static Strip before touch- 
ing your keyboard. 



ducts charges away from 
your computer. Touch the 
strip before touching the 
keyboard to drain away 
static electricity. 

The strip dissipates up to 
30,000 volts of static 
charge in 3/10 of a second 
without arcing or any static 
sensation to your fingers. 

Contact Take Charge 



Inc., 950 S. Cherry St., 
Suite 920, Denver, CO 
80222, 303-759-0368 for 
further information. 
Reader Service ^ 573 

Stories of Steele 
And Stone 

Sam Steele and the Stone 
Girl ($24.95) is a private eye 



adventure game for the 
Models I and III that com- 
bines the suspense of pri- 
vate eye adventure novels 
with the excitement of an 
adventure game. 

You are Sam Steele, a 
streetwise, but down-on- 
your-luck private eye out to 
solve the case of your life. 
As you wander through the 
game's 130 rooms, you en- 
counter an assortment of 
characters. 

The game starts with a 
call from one of the city's 
most prominent citizens. 
After that it's a race against 
time as you use your wits 
and intuition to check out 
leads and solve the case. 

For more information 
contact Allegro Software, 
P.O. Box 6593, Station J, 
Ottawa, Ontario, Canada 
K2A3Y7. 
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ALWAYS AT TDC.QfY ALWAYS AT 



SALE PRICES 



SALE PRICES 



OUR TRS-80s Have the Radio Shack warranty 




HARD DISK DRIVES 



COMPUTER, 

Center 



WE SHIP 

FAST! 



DI U COMPUTES CENTER 

326 MAIN ST.. GRAPEVINE 
TEXAS 76051 — (817) 481-7283 



*■ 



2 
MODEL 12 



i 




To get YOUR SALE price CALL: 

i -800-433 -S A L E 



ST— 



1 



DOT MATRIX PRINTERS 
DAISY WHEEL PRINTERS 



I I I I I tiki 

. . • ■ I 
....... 

' a. 1 




MODEL 4-P 




MODEL4 



•» See List Ot Advertisers on Page 176 
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Flash Mail 

Electronic mail word 
processing, forms manage- 
ment, mailing list manage- 
ment, and communications 
capability — you can do it 
all on your Model 2000 
with Flash-Corn. 

This electronic mail inte- 
grated software package 
lets you create a letter using 
an internal module, Lotus 
1-2-3, dBase II, or any other 
software package. 

It features auto-dial, real 
time mailing, message stor- 
ing and forwarding, and an 
interface for a dozen car- 
riers, including EasyLink 
and MCI Mail. 

Flash-Corn has search 
capabilities for on-line data 
bases such as The Source, 
Delphi, CompuServe, In- 
stant Yellow Pages, and 
NewsNet, and works with 
dumb or smart modems. 

The package is $299 
from Omni Computer Sys- 
tems Inc., P.O. Box 162, 
Chestnut Hill, MA 02167, 
617-825-6700. 

Reader Service • 572 



Communications on 
Your Terms 

Century Software's Term 
communications software 
for Model 16 Xenix systems 
combines sophisticated 
communications capabili- 
ties with ease of use. 

Term lets nontechnical 
Xenix users communicate 
through the serial port with 
remote systems, modems, 
and lap-sized and portable 
computers outside the 
Xenix environment. 

You can transfer ASCII 
and binary data between 
Xenix and other systems via 
direct cable or modem, and 
you can select carriage re- 
turns or line feeds for text 
file compatibility between 
systems. 



Other features include a 
dumb terminal emulation 
mode for remote systems, 
automatic error checking 
and retransmission, and a 
data capture feature for 
saving transcripts of ses- 
sions to disk. 

Term is $295 from Centu- 
ry Software, 9558 S. Pine- 
dale, Sandy, UT 84092, 
801-943-8386. 

Reader Service • 570 

Video Computer 
Tutorials 

If you've got a VCR and 
want to learn more about 
your Model 4, Embassy 
Home Entertainment (1901 
Avenue of the Stars, Los 
Angeles, CA 90067, 213- 
553-3600) offers Compu- 
Tutor, a series of 1 '/2-hour 
videocassette tutorials that 
cover four applications 
programs. 

Modules teach the fast- 
est, most convenient, and 
least intimidating way to 
use your computer and ap- 
plications software. 

"Using Your Machine" 
introduces you to comput- 
er jargon, hooking up 
equipment, how to use the 
keyboard and special func- 
tion keys, operating system 
commands, using printers, 
and using software. 

"Using VisiCalc" shows 
the basic properties and ap- 
plications of the VisiCalc 
electronic spreadsheet. The 
video shows VisiCalc screen 
displays. 

"Using WordStar" shows 
the use and application of 
Micropro International's 
word processing program 
for CP/M Plus. "Using 
dBase II" shows how to 
use Ashton-Tate's relation- 
al data base program. 

Videocassettes are avail- 
able in VHS or Beta format 
and are $69.95 each. 
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Computer Psychology 

The alarm clock rings at 8:30, but you don't hear it. 
You were on the computer until 4:30 this morning. 
You're going to be late for work again and your kids 
aren't speaking to you anymore. Your computer hack- 
ing has turned you into a computer addict. 

Counseling might help, but you hate the idea of a 
face-to-face encounter. If your computer is running 
your life, or if you're suffering from stress, loneliness, 
anxiety, depression, or other of life's problems, call Tele- 
Psych for help. 

This 24-hour system, run by Dr. Timothy Miller, a 
licensed clinical psychologist, is open to anyone with a 
computer and a modem. 

Established clients prepare communications and 
transmit their messages to TelePsych, then call back 
after seven days for Dr. Miller's reply. 

Dr. Miller charges by the word: 7/10 of a cent per 
word sent, and 2 cents per word for Dr. Miller's 
replies. Clients must send a $25 deposit against ser- 
vices. 

On-line pamphlets containing brief advice on com- 
puter addiction, how to choose a therapist, quitting 
smoking, anorexia, and other subjects are available 
free to callers. 

TelePsych is less expensive than face-to-face 
counseling, and is especially suited to persons with 
relatively minor problems. 

Access TelePsych at 209-473-8296. Parameters are 
8-bit word, 1 stop bit, 300 baud. If you have trouble ac- 
cessing the system, call 209-473-4211, or write Dr. 
Miller at 2155 W. March Lane, #2B, Stockton, CA 
95207. 
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CBUG 

The ultimate TRS-80 Model 100 debugging utility for assembly 
language programs and/or subroutines called from BASIC. Re- 
quires less than 3K RAM. 
Features include: 

• Instruction Step • Dump Memory & Regulars 

• Cell/lnatruction Step ■ SearcnfRvplacv 

• ZeroiT ill Memory • HEX Mem ( ■ & -I 

• Load Data » Decimal ■ HEX Conversion 

• ANer Registers • Display in HEX I ASCII 

DeMOM 

An advanced disk/file organizer that provides automatic date 
stamping of tiles and disks during adds/updates when utilizing 
OOSPLUS 3.5 and DOSPLUS 3.5 formatted disks. Automatic read- 
ing of disk directory for most DOS directories. Requires 32K - 2 
Disk Drive System. Features include: 

■ Menu Dnven • Correction Facilities 

• Status • Printing 

• Searching • Descriptions 

Mail this order form to: SUN Software 

3228 5th Avenue 

Beaver FaHs, Pa. 15010 ftc . 

Call for COD. (412) 843-1597 "■■ 

Please rush my order for: 

CBUG - Model 100 Debug Utility 

Tape ■ J29.95 Disk • $34.85 

DISKDIR OISK/FILE ORGANIZER 

Tape $29.95 Disk $34.95 

Cashiers Check, Money Order or COD orders only please 



address . 

CITY 



PERIPHERAL SWITCH 



AUTOMAT IC SWIT CHES 

for hisRiail 

Fast, easy, automatic way to share a 
printer or modem among many com- 
puters. No software required. RS232 or 
Centronics. It scans for peripheral re- 
quest, connects to the peripheral, 
handles all hardware handshaking, and 
releases the port. LEDs display chan- 
nel selected and busy status. Attractive 
aluminum box. # channels-price: 
2-S200 4-S250 6-S30O 8-S350 

MANUAL SWITCHES 
FOR TRS-80 

Uses PC board and aluminum box. 
n lines switched RS232-10 Cent-20 
RS232 l:2$59(wow) 1.4 $99 

Centronics 1:2 $99 1:4 $179 

Free book with each order entitled 
Serial and Parallel Explained 
ROSE MC AN D VISA 

iiicT«o«cs (7 13)240- ROSE 

P.O. Box 742571 Houston, Tx 77274 

• 53 
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Dot Matrix Printer interlaces with TRS-S0 
Featuring a TRS-80 compatible parallel inter- 
face. Addmaster Corporation has produced a new 
dot matrix printer, Model 170. The Interface in- 
cludes a Centronics-type handshake and DB-25 in 
tertace connector. Baudot, and day— and time 
clock. The Model 170 provides 18 or 21 characters 
per line, 6 lines per Inch print density, on standard 
2Vi" adding machine tape. Designed to use with 
personal computers, Model 170 will produce hard 
and carbonless copies of programs, data or results. 
Write Addmaster Corporation. 416 Junipero Serra 
Dr.. San Gabriel. CA 91776 or call 213/285-1121. 



TRS-80 - 

GENEALOGY 

SOFTWARE 

GENSYSTEMS 1.3 

Models I and III 
TRSDOS" 2.3 1.3 

$128.45 

(>-( RAB 5.0 

Models 4 and 4P 
TRSDOS' 6.x 

$195. (X) 

(.-CRAB 5.0 
Models II. 12. and 16 
TRSDOS' 2.0a TRSDOS- 1 1' 4.2 
$195. (X) 

Please write lor a free software 
summary packet. 

Send $2 (X) tor a descriptive booklet on 
GENSYS I IMS or send S2.(K) for a booklet on 
G-CRAB (both releases). 
ARMSTRONG 

GK.NKAl.OGK A I. 
SYSTEMS 

5009 Utah Drive 

Greenville, IX 75401 
(214) 454-8209 



•102 



Debug Programs Fatter! 

DPiT('or Debugging Programs by Interpretive 
Tracing) is a sophisticated tool with which you can 
explore and debug machine language programs. 
in the COMMAND mode, it will step through 
machine language programs one instruction at at 
time or a block ot instructions, showing you the 
address, hexadecimal value, Zilog mnemonic, 
re'erenced registers contents and referenced 
RAM contents tor each instruction The 7 dit 
terent COMMAND mode commands include load 
a program '-om disk, output to line printer c video 
display anddetmeupto 16 different trace limits in 
RAM The 19 commands n the DFBUG mode in 
dude block move, execute a CALL or RST, till 
memory, find bytes, jump to address, memory 
modification in Hex or ASCII and modify flags oi 
iegiste's DPfT includes a comprehensive 
manual available on y on disk 
DPIT $32.95 

ORDERING: Specify Model 1.3. or 4 include 
$2 50 'or postage and Handling Ma'yland 
residents add 5%sales tax 

McSys tems Software "«1 

P.O. Box 44313 
Washington, D.C. 200264313 



NEW! Lower Prices!! 

wabash 

six -year warranteed 

DISKETTES! 
$13.90/box (10) 

5%" single -side, single-density; double-density 
add $2/box Add $3 per order shipping. In Illinois 
add 7°h sales tax. 

Library Case-$1.50 (with disk purchase) 

Immediate shipment on VISA, MasterCard or 
Money order; add 14 days for personal checks 

CALL TOLL FREE sab 

(800)222-1248 - 



In Illinois Call (312) 882-8315 

DEALERS! SCHOOLSI USER GROUPS! 

Call for our volume discount prices!^. 367 



DIGITAL IMAGES 

1185 Tower, Schaumburg IL 60195 



PLAY CHESS WITH THE MASTERS! 
INTRODUCING 

CHESS CLASSICS 



Entertaining, educational chess software 
to improve your chess game. 

Each disk contains 64 games played by 

masters from Morphy to Fischer 

and Karpov. 

Use CHESS CLASSICS to look at a great 

game and see if you can guess the 

winner's move. 

Built-in scoring system gives you an 
approx. US Chess Federation rating for 
your success in picking the right move. 

Available for TRS-80 Model I, III and IV 

KING PAWN DISK $59.95 

QUEEN PAWN DISK $59.95 

BOTH DISKS $100.00 

(CT Residents add 7Vi% sales tax) 
Send check or money order to: 

Noteworthy Software Inc. •* 1 27 
12 Noteworthy Dr., Danbury, CT 08810 



LNW SERVICE 

QUALITY REPAIRS ON ALL 

LNW FACTORY ASSEMBLED 

PRODUCTS INCLUDING: 

• TEAM AND ALL LNW80 MODEL COMPUTERS 

• SYSTEM EXPANSION II 

• LNDOUBLER AND LNDOUBLER 5/8 

• LNW DISK DRIVES 

COMPUTER UPGRADES: 

• CP/M 2.2 

• HARDWARE 80 x24 

• MODEL 4 UPGRADE 

• TEAM UPGRADE 

OTHER PRODUCTS AVAILABLE: 

• HARD TO FIND LNW PARTS 

• LNW SOFTWARE 
Editor Note: 

This space open for specials! 

WILSON TECHNICAL SERVICE " 123 

8:00 am — 5:00 pm (pst) AFTER 5:00 pm (pst) 

VOICE (714) 847-3722 DATA (714) 847-3722 

300/1200 BAUD 



PflSSUORDS 
Cot you down ? 



TRS-80 Model m owner*. Have you ever forgotten, mis- 
spelled, or miB-eiitered ft password? Now you oan remove 
passwords from any T1U3D08 1 3 disk file with PAS8ZAP. It 
will also remove disk master peanrorde P AS8ZAP la aeey to 
use. with on screen Instructions and oomea with a oomplete 
instruction manual. PAS8ZAP requires a Model m with at 
least 32K RAM and one disk drtvs. Take advantage of our 
new low prloe of only (30.00 

Also CASSETTE HANOMAN that runs on a Model m with 
10X RAM and offere play against the computer or a friend 
for only 1 10 00 

TO ORDER: Send check or money order along with 
your choice of programs. (Utah residents please 



add appropriate 



QUESTIONS?: Pie 
inquiries. 




TRSDOS and TRS-80 



lies tax.) 

e include a SASE with all 

J. STAR ENTERPRISES 

P.O. Box 362 

Or«», Utah 84057-0362 

trademarks of Tandy Corp. 



• See List of Advertisers on Page 176 
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MICRO MASSAGE 

A Touching Gift! 




The message is circulation and the medium 
is ACU Pressure Point Massage WHILE YOU 
WORK this ergonomic tool stimulates relax 
es and exercises your feet, legs and lower 
back 1 Gentle pressure rolls out fatigu&causing 
toxins, grounds static buildup and keeps your 
entire body healthier and more user friendly 
The Tootsie Roll is compatible with all hard 
and software systems 

It's a delicious feeling 1 

Only S20.00 delivered Money Back Guarantee 

For catalog of other ACU Massagers 

send $100 to. ^v 

ACU Pressure Point Products »20 

P O Box 1 7278. Seattle. WA 98107 



TRS-80 SOFTWARE 



wnu icy oui necadUa car* 

logue of oy» 100 pages con 
laming nund'Ms ol p«ogr»ni» 

lo> I'M M.<o»i I ill and CoKv *s • s 

Comput* Catalogue ■ H 00 

't'undabla on yuui '«%i orOa* All aoflwara n u'KOndilionaiiy 
guaianiaad lof llta" Canadian manufacturer and dlatribulo' 
lex MoHrneri ud of England 




I ' *. I "■■ WELCOMf 

GAMES/ DOS/UTILITIES/ 
BUSINESS PROGRAMS 



♦ 



LOOS »tS9 9S 

MUITIOOS JU9 95 

ACCEL* ti 39 95 

> HiK.n J «'3 9S 



POWEHMAIlPLUS 
AIHBUS 
OATAWRItEH 
OHtVf RCOMPIlEB 



» 199 95 
S 41 95 
1189 95 
S 4 J 95 

% i6 95 



JUMBO $ 40 95 -ENIGMA 

FULLY SUPPORTED 
COMPUTER SOFTWARE 

'''•fl»"M'» Ol 'ind?LD'|)0»«l'0" 

JSOFT 

PO Boa 1437 WINNIPEG Manitoba R3C 224 
(204| 942-0963 CANADA 



s m 



IEEE-488 TO TRS-80" INTERFACE 

Everything needed to add powerful 
BASIC GPIB 488 controller capability to 
TRS-80 Model 1, 3 or 4, Level 2 or 0OS 
with a minimum of 16K 



~~ 



4*8 $OC 

Foi Model 3 or 4 

Optntion 488 BOB 

Foi Modal 1 
Operation 



\JEL 



Model 448-80B or 488-80C Price: $425 

♦ shipping insurants i tai 

WHEN ORDERING SPECIFY DISH. OR TAPE 

SCIENTIFIC ENGINEERING 
LABORATORIES 

11 Neil Drive • Old Bethpage NY 11804 
Telephone (516) 694-3370 

• Trademark o' Tandy Corp 
There is no a/filiation between Scientific 
Engineering Laboratories and Tandy Corp or 
Radio Shac* 
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GRAMARCY™ 
The Word Game 

For the Tandy 2000'" $2995 

if you like playing the word game in your daily 
newspaper you will love G'amarcy In this game 
the compute* will pick a word of seven to eleven 
letters for you to solve While you are entering 
you' solution the program will compute the coi 
rect answer You will be scored on the words yoo 
form from the letters in the given word When you 
finish your list will be scored if high enough your 
score will be saved on a permanent list for that 
word length 

The program includes a routine which will print all 
words of four or more letters contained in any 
word you enter Another routine to not only add 
and delete words but also to display any word and 
all its anagrams is included Write for more infor 
mation and program requirements 



Robert I Nloolal 
4038 N Ninth Street 
St Louis. MO 53147 

•Rec Trade Mark 



DISCOUNTS 

on all 

TRS-80 
COMPUTERS 

with 
Radio Shack Guarantee 

Call or Write For 
Free Catalog and Price List 




ra 



HARMON 
Hdw. I Supply 

307 N. Main 

Denver City, Tx 79323 

806-592-2472 



Quit Wasting 
Your Time! 

Use our friendly programs They save 
keystrokes speed up Basic operation 
and add extra features to most Model 

1 >' 3' 4, disk systems Try them and see 
for yourself (or write lor information) 

FAST4/CM0 $14.95 

¥4. only Full speed no »«>e effects 

AutoPAWS $14 95 

Ml /J/4 . Slops scrolling when CRT tills 

UTILIPAK $24.95 

Assorted utility programs lor I4U3/4. 

MENUGEN $54 95 

M3'4. includes BASIC speed up tiles 

Add $3 pet order packing and post 
age Immediate shipment by 1st class 

Mail. 

the software factory 

12101 N Western View 
Oklahoma City. OK 73132 9270 



,tfO?5 I /r^B 3 J 1 



^104 



FREE 

business software 
directory 

. Radio Shack's Model I 2. i 

& 16 
. ( I'M Xerox, Alio 
• IBM PC & compatibles 

Dal ;i base manager, integrated 
accounting package m\cntor\. 
word processing, and advanced 

mailing list 



£* 



Micro Architect Inc. 

6 Great Pine Ave. 

Burlington. MA 01803 

617 273-5658 



\ferbatim 

flexible disks 

Call Free (800) 235-4137 for 

prices and information Dealer 
inquiries invited COD and 
charye cards accepted 

V/S4' 




PACIFIC 
EXCHANGES 

100 Foothill Blvd 
San Luis Obispo, CA 
9340 1 In Cal call 
(8(H)) 592-5935 or 
(805) 543-1037 

r-207 



Subscription 
Prdblem? 



80 Micro does not keep subscription 
records on the premises, therefore 
calling us only adds time and doesn't 
solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to 

EJOmirro • 
Subscription Dept. 
PO Box 981 
Farmingdale. NY 11737 



Thank you ana en|OV you' Subscription 
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Is your computer worth $50.00? 



COMPU-FIRE™ 

20 oz. Halon 1211 

Microcomputer 

Fire Extinguisher 

For printers & peripherals too 
Made in USA - UL rating 2B:C 
No mess - clean & sate 
No CO? static to zap data 
No powder to corrode boards 
Chrome plated DOT steel cylinder 
Metal valve with pressure gauge 
Height 10 in., weight 2 1'4 lbs. 
Rechargeable locally or by us 
5 year warranty 1 

Send $50 cfc, MO. VISA, MC. 

IWIudcJ Shipping eV Handling 
PA residents add S) sales tax 
Dealer inquires uelcome. 

PROTECTALL CORP. 
5422 Page Drive, Dept. 39 
Pittsburgh, PA 15236 
(412)882-0114 _ 69 

Data Protection Since 1970 




INSTRUCTIONS 

>imvjk 

LSBB 



TRS-80 MODEL llll-IV 

(Software Discounts) 


1. Disk Operating Systems 

DosPlus 


$149.95 


2. Word Processing 


MScript 


.$79.95 


3. Terminal Communication 




Mterm 


$79.95 


BBS 


. $79.95 


4. Assembly Language 

M/zal 


$149.95 


5. Accounting System 

MBS 

6. Custom Orders 


$250.00 


Business 

Call Toll Free 


(call) 

• 27 


Modes 800-622-4070 
Sat ILLINOIS ONLY 
800-942731 7 
DESIGN SOFTWARE 

Sun. Box 42847 

7-5 Las Vegas, Nv 89104 


Voice 

Mon. 
thru 

Fri. 

9-5 



TRIYIA 



THE ULTIMATE CHALLENGE 



A Factual Game of Obscure Knowledge 

A Graphic Board Game For 

TRS-80 Model III. 4* 

2 Disk, 32K 



$25.00 



iShippnis. 



Hdi 



Send Chech or Mone^ Order To: 
Hi-Desert Software 

P.O. Box 2036 
29 Palms, CA 92277 



•PI. 



oVI 



*s 66 



FOR MODEL 100 




STRONG VERSATILE HARD COVER 

THE PERFECT SOLUTION to proper protection ot 
screen, keys and key switch shafts when carrying 
in a briefcase, its softcase or in any case Made 
of 080 inch thick super strong high impact 
Eastman PETG plastic. 

DESK TOP PROTECTION from dust, spills and 
things that get dropped Optically clear so auto 
prompted messages are seen at a glance 

THE ULTIMATE LAP MACHINE! Invert cover and 
add prop legs to create a stable interlocked unit 
at a most comfortable lap use angle 

$17.95 + $2 00 S & H CHK OR M0 TX RES ADD 5% 

• 64 Money back satisfaction guarantee! 

THE SOUTHWORTH COMPANY, Dept. D 

4001 HAWTHORNE AVE , DALLAS, TX 75219 




Where is that 
Movie?' 

Find it quickly, c«is//iy with 

VHSEOTKPE 

TRACKER 




I by tapr Ml* W 

ver> fast • ready lo use 

TAPE 

TRACKER i 



PRO .si 

Dep I Box 560 

No Hollywood, C A 91603 

(818) 764-3131 

T JMMS .ISA »*X checKt I LAD fV«u-* Ml 



phi M«ha 

■• i 

->»(Vf toda* 

(800)824-7888. 
oper. 422 

PLEASE SPECIf-V 
IBM PC MB I d»k 

nts-aoiot iii 

48K. 2 duti 
Tandy 2000 

ALL THIS 
FOR ONLY: 

•39.95 



DATA ACQUISITION 

and control for ANY computer 




The Model 8232 communicates via 
RS-232, and has 8 analog inputs (0-5 VDC; 
8 bits), 8 digital inputs and outputs, and a 
2000 point buffer. Suitable for field data 
logging or lab use, the 8232 costs only 
$540. Direct bus-connect unit for TRS- 
80/111 & 4 is $295. Detailed manual. $6. 
Phone our applications engineer or write: 



^ 4 STARBUCK + + 

^ m DATA COMPANY ^ ^ 



225 Crescent St . Waltham, MA 02154 . (617) 899-6629 



A/D to RS-232 
CON VERTOR KIT 

• FOR ANY COMPUTER 
WITH AN RS-232 PORT 

• 0-5 VOLT INPUT 

• 8 CHANNEL INPUT 

• 8 BIT RESOLUTION 

• 300-9600 BAUD 

• SIMPLE OPERATION 

• PS, PC BD, PARTS 
& MANUAL 

$59.95 & $4.00 SHIPPING 



14820 Elmore Road 

Anchorage, Alaska 99516 

(907) 345-6730 



UITRMIN and 

MINERRL DEFICIENCY 

CHRRT 



You- conouter mil analyze your ansaers to i9£ questions 
concerning your body and then print a chart shoving probable 
deficiencies of 33 vitamns ard minerals pins protein and fat 
C5Lch questions as. Do your eyes hurt iihen you go out into 
the sun 7 Is your hair beginning to grey 7 Dc you s'eep iiell 7 
etc e«c ) 

[ones corpe«e aith 50 quest onnaires 50 blan« Nu'nt.onal 
progran forrs nstructiDns on conpleting the Nut-'tionai 
forns fron your co«pute r generated chart and an excellent 
instruction aanual and a 5 1/4 inch disK This prcgri« can put 
you into a business of your oun selling nutritional programs 

mmmsmm msmomss msm 



U. HflX 



ikiinii. cm. II 



For Models I double 

density, 111/4 4BK 

C.O.D. and money 

orders are rush orders 



615 375-5355 

$89 . 50 

,-140 

Please Specify Model 



Control the Model 100 Directory 
Use 

* * * * UTILTY * * * * 

Rename files 

Relocate file position in directory 

Make files invisible 

Display individual file size or all 

files at once 
Reset Maxram, Maxfiles, 

protected memory and function 

keys 
Make application programs 

invisible 
Kill files 

Send $29.95 (check or money order) for 

cassette and instructions to: 

Folts Computing 

4598 Deercreek Lane 

Concord. CA 94521 

(415)676-1120 



See List ot Advertisers on Page I '6 
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ASK TANDY 



How Tandy Designs and 
Buys Its Micros 



Starting this month, 80 Micro will feature 
"Ask land}, " a column in which the Tandy 
people in Ft. Worth answer your questions 
about their products and services. Just to get 
the hall rolling, we gave them a list of questions 
that we \e heard from TRS-80 users lately. If 
you have a question, send it to Ask Tandy, 80 
Micro. 80 Pine St., Peterborough, NH 03458. 

\£l How does Tandy/Radio Shack 
decide what features should go into a 
new computer? 

JK • Several factors go into defining 
a new machine: available (possibly 
new) technology, customer requests, 
technical support requirements, an es- 
tablished need or market, and what 
the competition is likely to introduce. 

\gl We hear a lot about Radio 
Shack's buyers. Who are they, and 
what do they do? 

J\.l Buyers develop a product line, 
request and approve advertising for 
their line, and make sure products are 
available in the stores in the right quan- 
tities. Each buyer is responsible for 
sales projections for his/her product. 

The computer buyers are a shy 
group, and asked that we not publish 
their names. I can tell you that there 
are eight of them (and more people 
in the Software Product Planning 
Group). The current buying areas are 
for the Models I, III, 4, and 4P, edu- 
cation products, peripherals, comput- 
er accessories, the Models II, 12, and 
16, the Color Computer, the Model 
J 00 and Pocket Computers, and the 
Tandy 2000. 

\2* Why doesn't Tandy release fig- 
ures showing the number of machines 
it has sold? 

j\ • We think published sales figures 
are confusing. Tandy/Radio Shack is 
both the manufacturer and the retail- 
er, so we'd have to decide whether to 
publish the number of units shipped 



from l he factory or the number sold to 
final users. Figures differ depending 
on whether you include floor demon- 
stration equipment in the number of 
machines sold. Because we have no 
single definition of a sale (in dollars or 
units), we don't consider publishing 
sales figures to be useful. 



\£l Why doesn't Tandy bundle 
software with its computers, as Kay- 
pro does? 

j\l We feel that each user's soft- 
ware needs are unique. Why should 
we make you pay for a bundled word 
processor if you don 7 want a word 
processor? Or make you buy a bun- 
dled data base management package 
that doesn 't do what you need done? 
Our philosophy is to let you choose 
the software that's right for your ap- 
plication. 



f^t When the computer industry 
seems to be moving toward generic 
DOSes, like MS-DOS and Unix, is 
there room for a proprietary DOS like 
TRSDOS? 

f\l Generic DOSes certainly fill a 
need in the marketplace, and to serve 
that need we sell MS-DOS, CP/M, 
RS- Xenix (an authorized version of 
Unix), and OS-9, and we might sell 
other operating systems as we see a 
market need. 

We also feel that there's room for 
our own DOSes. For the first -time 
disk user, Disk Basic on the Color 
Computer is nearly invisible and quite 
easy to use. If the user needs a more 
complex DOS we offer OS-9. 

Traditionally Radio Shack 's DOSes 
have been designed to help and protect 
the end user, and we think there will 
always be a need for that type of oper- 
ating system. Even within the Xenix 
environment we established a user- 
friendly shell (tsh) so the user can get 



work done without having to learn 
how to operate one of the more com- 
plex shells available under Xenix. 

\£l Is it true that Tandy has its own 
subway system? 

A * Yes, we do have a subway that 
goes from Tandy Center to our em- 
ployee parking area. 



\£l Why did Tandy stop publishing 
the TRS-80 Microcomputer News'! 

j\ I We had to make a decision: ex- 
pand the size of the Microcomputer 
News to IOO-plus pages so that we 
could properly cover the expanding 
Radio Shack computer product tine, 
or else find some other way to provide 
that coverage and support. When the 
News was first published it was, essen- 
tially, the only vehicle for providing 
written support to our customers. As 
the product line grew, coverage in oth- 
er publications (including 80 Micro^ 
increased. Tandy/Radio Shack feels 
that we can provide better, more com- 
plete support by using the existing 
magazines than we could by compet- 
ing with them for subscription dollars. 

\£ I What sort of computer training 
do Computer Center salespeople get? 

f\l Each salesperson receives ap- 
proximately 100 hours of formal, 
classroom, hands-on training in areas 
of company history and philosophy, 
sales techniques, and specific product 
training. Employees have three 
months to complete this training and 
advancement is related to the amount 
of training they've successfully com- 
pleted. ■ 



TRS-80. Tandy, and TRSIX)S are registered trademarks of 
the Tandy Corporation MS and Xenix are trademarks of Mi- 
crosoft Corporation. Unix is a trademark of Bell Laborato- 
ries. OS 9 is a trademark of Micro ware and Motorola. Inc 
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Introducing the Most Powerful 
Business Software Ever! 

TRS-80" (Model I, II, III, or 16) • APPLE" • IBM " • OSBORNE '"• CP/NT"* KA YPRO" 






ecNcSSftVcf^c^ 




ersaBusiness" Series 



Each VersaBusiness module can be purchased and used independently, 
or can be linked in any combination to form a complete, coordinated business system. 



VERSARECEIVABLES" $99.95 

RECEIVABLES'" is a complete menu-driven accounts receivable, invoicing, and 

month y Stat - t!.i' k d all information related to who 

.our company money, and can provide automatic billing for past due ac 

counts. Vvks-vKii ENABLES" ;>r-n- ill necessary statements, invoices, and summary 

reports and can be linked with VERSALEDOER II'" and KY". 

VERSAPaYABLES" $99.95 

VERSA PA\ ABU S ' .s designed to keep track of current and aged payables, keeping you 

lUCh money your company owes, and to 
whom. VtRSA PAYABLES" maintains a complete record on each vendor, prints checks, 
check registers, vo m .lyed payables reports, vendor reports, 

and more With VLKsaPa r"ABI ES ", you can even let your computer automatically select 
which vouchers ■■■'• ■■• "• paid 

VERSAPAYROLL" $99.95 

Versa Payroll- is payroii system that 

keeps track of all government required payroll information Complete empbyee records 
are ma- . ;wyroll tabulations are performed automatically, with 

totals displayed on screen for operator approval A payroll can be run totally, automati 
colly, or the ( eck from being printed, oi ti - '■ 

information on it. If desired, totals may be posted to the Vt KsAliix.i h If" system 



VERSALEDGER II " $149.95 

1 1 .FDGFR II" is a complete accounting system that grows as your business 
grows VfrsaLf.dgfr IP" can be used as a simple personal checkbook register, 
expanded to a small business bookkeeping system or developed into a large 
corporate general ledger system without any additional software. 

• VlksaLf.IXjKK II'" gives you almost unlimited storage capacity 

(300 to 10,000 entries per month, depending on the system), 

• stores all check and general ledger information forever. 

• prints tractor feed checks. 

• handles multiple checkbooks and general ledgers, 

• prints 17 customized accounting reports including check registers, 
balance sheets, income statements, transaction reports, account 
listings, etc. 

VfrsaI-Hm.ek ir* comes with a professionaliy-wntten 160 page manual de 
signed for first time users. The VbKSALfcDGLR II" manual will help you become 
quickly familiar with VFRSALf.DC.ER IP", using complete sample data files 
supplied on diskette and more than 50 pages of sample printouts. 



VersaInventorv 



$99.95 



VlKSAh". LN I ORY™ is a complete inventory control sys'em thai gives you h ' 

to data on any item. V reformation related to what 

items are in stock, out of stock, on backorder. etc , stores sales and pricing data I 

Is below a preset reorder point, and allows you to enter and print 
crlyortolmkwrihthe\^RSAnECEiVABL£S"sytterrt VERSABWENTORV prints 

all needed inventory listings, n ports Ol (ems lielow reorder point, inventory vat 
ports, period and year to-date sales reports, price lists, inventory checklists, etc 

•CQrYIPUTRQNICS: 

50 N. PASCACK ROAD, SPRING VALLEY, NY. 10977 



SATISFACTION GUARANTEED! 



Every VERS A BUS IN LSS * mouv« .s .jvarariteed to outpertorn all other ffr r . 

and at alrailiunul then cos' II you are not satisfied with any VTRSAB1 SIM SS'"nvxlu 

may return it within 30 days for a refund Manuals for any VERSABl.'SINESS'- module i 

purchased for $25 each, credited toward a later purchase of that module. 

AJJ CP M based Computers mast he equipped with Microsoft BASIC 

(MBASIC or BASIC 80) 



To Order: 

Write or call Toll-free (800) 431-2818 
(N.Y.S. residents call 914-425-1535) 



■ ■■■> 



• add $3 for shipping in UPS areas 

* add J4 for COD or non-UPS areas ^^ 

DEALER INQUIRIES WELCOME 

All prices and specifications subject to change Del'i 



' add $5 to CANADA or MEXICO 
* add proper postage elsewhere 






Cotp XEROX trademark Xerox Corp KAYPKO trac.. 
1 EC trademark Digital Equipment Corp - ZENITH trademark Zand 

^PERBRAIN Iradenu: ■ ■ ■ I I -•.■•■ ■ . •• 



THE RESULTS ARE IMPRESSIVE. . ." 

—Dennis Kitsz, 80 Microcomputing; 12/82 

La ngley St. Clair's* Soft-View 

Replacement CRT's 

eliminates the strobe, 
flicker and fatigue 
from TRS-80's: 

Now you can upgrade your monitor with 
the new medium persistence green or 
amber phosphor tube. 

State-of-the-art systems such as IBM"" 
and Apple IH' M do not use the less costly 
"P4" B&W display tube because it is 
actually intended for TV viewing and its 
rapid strobes (60 times per second) 
cause irritating eye fatigue. 

No amount of "green plastic" will solve 
this problem. But the new Soft*View 
CRT display tube from Langley-St. Clair 
will. 



n available 
for 
Models 4 &1 




Available in slow decay Green or medium decay 
'European Amber" (the standard in Europe) 

Made with Lead/Strontium impregnated glass that 
stops X-ray emission. 

Of high-contrast face glass that also stops most 
(J.V. radiation. 

Available in frosted glass with extra Anti-Glare 
benefits. 

Easily installed... comes with pre-mounted 
hardware. 

Warranted for one full year against manufacturing 
defects or tube failure. 

The finest quality double-dark glass phosphor 
fields to produce dramatic contrast. 

Ideal for Word Processing and Programming, yet 
fast enough for Games and Graphics. 



lsis Soft»View ,M CRrs 

□ *GN42 Green Phosphor $79.95 

□ *GN42G Green Phosphor w/Anti-Glare $89.95 

□ # OR34 Amber Phosphor $89.95 

□ # OR34G Amber Phosphor w/Anti Glare $99.95 

also available: 

□ *R22G Red Phosphor w/ Anti-Glare $139.95 

□ *B22G Blue Phosphor w/ Anti-Glare $139.95 

Plus: $7.00 for packing and UPS Shipping 

$17.00 for Overseas. Parcel Post or UPS Blue Label 
Add Sales Tax where applicable. 
(Inquire about the CRTs we have available for 
many other computer models) 



For MasterCard and Visa Orders only, call 

800/221-7070 S 9 1U 



• Langley-St Clair Instrumentation Systems, Inc. 

132 West 24th St.. New York, h.Y. 1001 1 " 




- -I- ^ 



I i lu ou bed pbolo. 
*WorldTs largest supplier of upgi icementi ki - 

Soft-View. IBM Apple and TR&80andtr k US. IBM. Apple Computer and Tand 



